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I. INTRODUCTION 
S urinary 

A learning styles project jointly proposed by Fox Valley Technical 
Institute, District 12, and the Center for Vocational, Technical and 
Adult Education at LW- Stout was funded by the Wisconsin Board of Voca- 
tional, Technical and Adult Education. During the 1972-73 academic year 
the Lhiversity of Wisconsin - Stout sub -contracted with FVTI to conduct a 
portion of the research for the first phase of the learning styles project. 
(Banks, 1973) The second phase of that sib -contract involved the develop- 
ment of a computerized model to manage an instructional system in which 
information about student f s preferred style of learning would be consider- 
ed in prescribing learning activities corresponding to that style. 

A model schema consisting of leamer-instructor-computer interactions 
was developed by analyzing the types of information necessary to manage 
a learning styles based instructional system. A series of computer pro- 
grams written in BASIC for the PDP-11 time-sharing system were designed 
according to the model logic. (The model could also be used to develop 
similar programs in other languages.) The computer management system was 
tested using the modules and alternative learning activities constructed 
for a basic physics program at UW-Stout. 

The system performed all expected management processes and output 
unique learning prescriptions based on learning styles. A complete eval- 
uation system was included in the model, however due to insufficient time 
and input data, that component was not tested. 



Instructors who analyzed the system agreed that the management com- 
ponent would be useful or necessary to manage a modularized instructional 
system. Several instructors and administrators who reviewed the system 
expressed concern over the procedure used to relate the learning activities 
to learning styles and recommended a more systematic approach to that 
process . 



Rationale 

Individualized instruction is recognized as an educational appro- 
ach necessary to provide for the many individual differences that exist 
among students. This need to provide individualized instruction is sug- 
gested in learning theories and is the focus of much current educational 
research. 

Although the need for providing individualized instruction has 
been recognized, seme basic problems tend to deter its implementation. 
One of those problems involves the handling of large amounts of informa- 
tion connected with managing a system in which each student may be at 
different points in the course and require different materials to learn 
a given concept or skill. 

Computerized systems are now available to help with all levels 
of this management task. By maintaining student records on a computer 
storage device and by continually monitoring a student f s progress via 
on-line terminals, the teacher has access to daily progress reports. 
More sophisticated systems can provide a more detailed analysis of students 1 
progress, suggest assignments and conduct on-line evaluation. With the 
present availability of moderately priced time-sharing equipment, the 
previously difficult bookkeeping problem involved in managing individual- 
ized instruction appears to be diminishing. 
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As the management of individg^aHz^, prescriptive, instruction 
becomes feasible another more fundamental problem concerning the criteria 
used to prescribe instruction must be considered. Learning style has 
been under investigation recently as a variable which tends to interact 
with various modes of instruction. As more evidence of this interaction 
becomes available, it appears that a ccnputerized management system 
can be used, in fact, will be necessary, to prescribe those learning 
activities which best match the learning styles of the learner. 



Problem 

This project was part of a more conprehensive project involved with 
identifying learning stylos of students and assessing their impact on 
learning in the post-secondaiy vocational -technical education program. 
(Oen, 1973) The problem for this sib -project was to develop a model for 
the conputer logic required to store, summarize and retrieve the student 
and instructor information required to manage a learning styles based 
individialized instructional system. 
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Objectives 

The specific objectives for this sib -project were to: 

1. Develop a list of the information teachers and students need in order 
to manage and fmction within a learning styles based individualized 
instructional system. 

2. Design an instructional information system model. 

3. Identify the computer program logic, inruts and outputs required for 
the instructional information system. 

4. Determine the feasibility of an on-line interactive terminal system 

for input and output of the instructional data used in the instruction- 
al information system. 
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II. REVIEW OF RELATED LITERATURE 

In a review of research on conputer -based instructional management 
systems, Baker (1971) briefly described several of the earlier management 
systems. Although each system described by Baker was designed to manage 
a unique instructional program, all systems included sane degree of test 
scoring, diagiosing, prescribing and Reporting. Also, each system in- 
corporated a similar basic model and curricular approach. Objectives within 
a sib ject matter area were grouped into instructional units . Pretests 
were used to deteimine students 1 present level of achievement and aid 
in prescribing instruction. Post -tests were used to deteimine whether 
objectives were achieved and detailed computer generated reports were 
always available to aid teachers in the diagnosing and prescriptive 
process. 

In summarizing his report, Baker indicated that although the re- 
porting aspects of the systems were reported in detail, the procedures 
for diagnosis and prescription were vague or completely lacking. Baker 
continued to discuss the problem of prescriptive capabilities of the 
various systems eiqphasizing the need for better diagnostic and prescrip- 
tive procedures. He concluded that considerable applied and theoretical 
work was needed on procedures for diagnosing and prescribing in order 
to develop them to a level adequate for CBIM and CAI systems (Baker, 
p. 64). 



The use of various forms of diagnostic learning prescriptions appear 
to be promoted by an increased use of conputer generated tests. Franklin 
Prosser and Dcnald D. Jensen (1971) describe an extensive computer gener- 
ated testing program at Indiana University in which students are permitted 
to keep the tests after they have turned in their answers. The students 
are then given the correct answers in return for their conpleted answer 
cards. This provides students with immediate feedback of results along 
with materials in the foim of test questions for further study. 

Descriptions of several existing conputer generated testing systems 
include references to various ways in which test results are used to pro- 
vide prescriptive feedback. Dudley (1973) describes a system in which a 
listing of the items missed, showing both the student f s answer and the ■ 
correct one, together with a reference to the course material is printed 
for the student. Hsu and Carlson (1973) use a separate program to print 
out exercise pages for missed objectives. Libaw (1973) described the 
M2NTREX system which provides individual tutorial feedback and refer- 
ences to specific information sources to reveal what his test reveals 
that he has not yet learned. 

Peih aps the most comprehensive work involving systematic prescrip- 
tive capabilities based in learning styles has been done by Dr. Joseph 
E. Hill (1971) at Oakland Conmunity College in Bloomfield Hills, Michigan. 
Hill uses cognitive style mapping to obtain a profile of students cogpi- 
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tive styles. That information can then be used to predict which learn- 
ing activities would be best suited for each student. 

III. KETHODOLOGY AND PROCEDURE 

This project of constructing a learning styles based management 
system was mdertaken in conj miction with another project in developing 
learning styles based curricular materials in the UW-Stout Physics de- 
partment. The physics project dealt primarily with modularizing several 
basic physics courses and designing various alternative learning act- 
ivities keyed to the objectives. Since the director of the learning 
styles project was also involved in the physics project, most of the 
initial testing of the computer programs utilized data which were gener- 
ated for the physics project. The physic modules were designed for stud- 
ents in technical programs; thus, many of the modules would be appro- 
priate for vocational-technical schools. 

Descriptions of the method and procedure for each activity as list- 
ed in the project proposal are as follows: 
Activity #1. 

Using a nominal group approach, determine the 
instructional information and conputer-output data 
needed by teachers and students in order to create 
an effective learning environment . 

To identify the information involved with managing a learning 
system the director of this project worked closely with tho following 



people: 

a) Dr. Orville Nelson, Research Specialist 

Center for Vocational, Technical and Adult Education 

b) Dr. Steve Possum, Associate Professor, Physics 

c) Dr. Mark Lardiez, Assistant Professor,, Hiysics 

In individual consultation, Dr. Nelson provided the initial informa- 
tion used in outlining the project and identifying the limitations or 
boundaries of the information sought. His information was based on 
meetings with staff at FVTI and involvement in Banks (1973) project. 
Then, over a period of a few weeks, the director met regularly with Dr. 
Possum and Dr. Larchez to disciss what specific information was necessary 
to develop an individualized instructional system based on learning 
styles. The information identified was classified according to whether 
it was associated with students or sibject modules, and later formed 
the two major files in the management system. (See Appendix A) 

Activity #2. 

Create an instructional infoxmation system model. 
The information system model was developed by first identifying 
activities required of instructors and students in a learning center 
environment tfiere learning activities are prescribed according to in- 
dividual styles of learning. Next, those activities such as generating 
learning prescriptions, record keeping, reporting and evaluation were 
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selected for inclusion in the basic model. The procedures dictated by 
those activities were then flow charted and integrated to form the system 
model. 

Fundamental to the model is the role of the system as an extremely 
efficient instructors aid thereby permitting a greater degree of instruc- 
tor-student interaction in the learning center. The system prescribes 
learning activities and controls evaluation procedures while automatically 
recording infbimation to be processed and presented to the instructor. 
The instructor uses that processed information to update instructional 
materials and form the basis for better professional interaction with 
individual students . (See Appendix B) 

Activity #3. 

Develop the conputer program logic needed to handle 
the instructional information identified in activity 2. 
Using the information determined in activity #1 and the processes 
identified in activity #2, a conputer system consisting of three main 
files and two groups of programs was planned. The three files included 
an individual student file, a module file containing information and 
l&rning activities for each module and a testing file containing the 
test items for all modules. (See Appendix C for Madule 5 Student File 
Layouts) Che group of programs which students would need to interact 
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with the system were outlined and another set of programs which instructors 
could use to retrieve reports and update the system were identified. 

The computer programs necessary to provide adequate learner inter- 
action with the system were identified by constructing a schema depicting 
the learner, system files and the types of input-output previously dis- 
cussed. A flow chart of student activities was constructed to provide 
a sequence which was then used to explicitly define and interrelate each 
of the conputer programs* (See Appendix D for Learner Interaction $ 
How of Student Activities) 

In the flow of student activities the student first plans his pro- 
gram of studjy by selecting those modules he plans to study and identifies 
each module with the date he plans to start that module • 

The student then conpletes a learning styles questionnaire and 
takes a pre-test, the results of which are entered into the system via an 
optical reader. The learning styles information is used later to pre- 
scribe appropriate learning activities and the pre-test can be used in 
one of two ways . 

The flow chart in Appendix D shows the pre-test used as a pre-entry 
instrument. In this mode the student demonstrates various entry skills 
before he is given a learning prescription and is pemitted to enter a 
learning nodule. The other way in ldiich the pre-teslf can be used is in 
testing out of modules. If the pre-test is equivalent to the module post- 
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tests, then the pre-test information may be used to deteimine if stud- 
ents can bypass modules. 

After students have taken the pre-test and learning styles question- 
naire they will enter their name and program of stuty into the system via 
teletype or CRT in the learning center. After a program of study (list 
of modules with starting dates) is entered by a student, that .student may 
approach the system via terminals in the learning center at any time to do 
one of the following: 

a) Change his program of study. 

b) Print out his current program. 

c) Print out a sunraiy of progress and his current status. 

d) Request a learning activities prescription. 

e) Request a test on his current module to be taken on-line on a 
CRT. 

(See Appendix D for a List of Conputer Programs for Student Use) 

The computer programs necessary for instructors to interact with 
the system were identified by constructing a schema depicting the instruc- 
tor, system files and the types of input -output previously discussed. 
(See Appendix E for Instructor Interaction) 

Conputer programs which instructors needed formed two groups, those 
necessary to update information in the system and those used to output 
reports necessary for efficient management of the learning center. After 



13 



ERLC 



18 



students were enrolled and had entered their programs of study, instruc- 
tors could approach the system via terminals at any time to do one or 
more of the following: 

a) update modules and learning activities in the module file. 

b) update test items in the test file. 

c) print out the following reports: 

1. Expected Module Entry. 

2. Current Nfodule Use. 

3. Progress List for all students 

4. List of students enrolled. 

5. List and summary of nodules available. 

(See Appendix E for List of Conputer Programs for Instructor Use) 

Activity #4. 

Write a conputer program to simulate the information 
handling and processing required by the instructional 
info mat icn system . 

The conputer programs identified in activity #3 were written in the 
BASIC-PLUS programming language to be executed on the PDP-11 time-sharing 
conputer system at IW -Stout. (See Appendix F for Conputer Program List- 
ings) 

Two programs, TESTER and TESTUP, comprising the evaluation part of 
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the system were not written. The decision to continue without those 
programs considered the fact that an off-line computer generated testing 
system was already in use at UW -Stout. Therefore, the writing of those 
programs could be done quickly at a later time.. Also, the Center for 
Vocational, Technical and Adult Education was working with Fred Tiirm in 
developing a random test generation program- for the Comnurricaticns Skills 
courses at FVTI. 

Activity #5. 

Pilot test the computer program at tW-Stout. 
As each computer program was written, it was debugged by executing 
the program with explicit input data which would prodbce predict* le 
output. Also, when two or more oonputer programs conprising a sib -system 
were completed, they were executed with similar input data. The final 
system (excluding the evaluation component) was tested with the same 
input data with the resulting output being compared with the predicted 
output. 

Activity #6. 

Write and/or select alternative modes of instruction 
for a specific unit and place these in the instiuctional 
information system . 

This activity was performed in cooperation with the concurrent 
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Physics Project in which modules with alternative modes of instruction 
were being written for a basic physics course. A 5 semester credit 
basic physics course was divided into 14 modules and each module was 
outlined according to a specific format. Such- things as number, name, 
prerequisites, alternative learning activities, etc. were stated for each 
module in such a way as to be easily entered into the computer system. 
(See Appendix G for Module Format) 

Two module entry requirements were considered important for this 
particular application. These requirements included a list of prerequisite 
modules for each module and a list of prerequisite entry skills for each 
module. . Most of the modules had other modules as prerequisites, however 
a few modules had no prerequisites, modules thereby providing several places 
(areas of study) where students could enter. The prerequisite skills 
became the pre-test items which were to be administered at the beginning 
of the course. (See Appendix H for Available Modules for Physics 221 
and Prerequisite Skills for Physics Courses) 

After all modules for the course were identified according to the 
module format, a set of explicit behavioral objectives were written for 
each module. (See Appnedix I for Module #125 Objectives) A general 
list of possible learning activities were selected for each objective. 
(See Appendix I for Module #125 Activities) 

The process of prescribing only those activities which were most 
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closely matched to the student's learning styles required that each 
activity be associated with a set of styles. For 'this particular 
application two style continua (synbol ic-ccncrete and unstructured-struc- 
tured) were selected and each activity was assigned a two element array 
which placed that activity on the two continua. (See Appendix J for Use 
of Learning Styles to Prescribe Learning Activities) 

The last step in preparing the system for operation involved 
entering the rodule information. Computer program f M3EADD ! was used to 
enter the basic informatipn about each module as listed in Appendix G. 
Then 'NDDSUM' was used to enter the activities for module #125 as listed 
in Appendix I. 

Activity #7. 

Test the feasibility of the alternative modes of 
instruction as managed by the instructional information 
system. These tests will be conducted at Fox Valley 
Technical Institute by means of a portable remote -entry- 
data terminal . This terminal will be placed on line 
with the PEP 11/40 system based at UW-Stout. Students 
and teachers will be able to utilize this system and will 
be requested to evaluate it in terms of its functionality 
and effectiveness in processing the data they need. A 
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preliminary cost/benefit analysis will Tte conducted tin the 
instructional information system * 

Since the remote-entry data terntirtal was not available and FVTI's 
time -sharing system was not operational the feasibility test was not 
done at Fox Valley Technical Institute. However a test involving select- 
ed faculty and students at UW -Stout was conducted. A one page sample 
'Information to Students' sheet was attached to the list of available 
modules and distributed to several faculty menbers and students so they 
could plan a program of study and enter that program into the system. 
(See Appendix K for Information to Students and a sanple of the terminal 
interaction printout of a student entering and listing his program of 
study.) 

After the students' programs of study were entered they were asked 
to run the computer program NXTM3D which would provide a Learning Activi- 
ties Prescripton for their first module. However, since only the act- 
ivities for moduLe #125 were available in the system, only those students 
who were eligible for that module received a Learning Activities Prescrip- 
tion. (See Appendix L for sajqples of Learning Activities Prescription) 

The computer programs producing the following reports to faculty 
were also run to complete the system test. 

a) Expected Module Entry 

b) Progress Report 
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c) Current Nbdule Activity 

d) Module Sunmaiy 

(See Appendix M for sanples of those reports) 

In April and May, 1974 the researcher made two presentations to 
FVTI staff on the model, the system and the types of reports provided 
for teachers. and students. No additional information needs were defined 
during these meetings. 

* 

During Professional Growth Week -I I held at UW-Stout during the week 
of Jvne 4 - 8, 1974, the researcher demonstrated the system and discussed 
applications with the vocational teachers in attendance. 

IV. ANALYSIS 

M>st of the information determined to be necessary to individual- 
ize instruction based on learning styles was used in the model. The 
student f s initial program of stu<V was used to provide reports cn expect- 
ed module use, and all faculty menbers who tested the system agreed that 
those reports would be useful in managing instruction in a learning center 
environment. The learning styles information was used directly to 
match activities styles to student's learning styles. Actual accumulated 
pre -test and post -test information was not available for testing because 
the evaluation conponent of the system was not completed. However, dumny 
data was used for this accumulated information thereby permitting a more 
coiqplete test of the system. 



19 

24 



The particular application to which the model was tested used the 
pre -test component for determining entry requirements. To insure that 
students entering a particular module possessed those skills needed to 
perfbim the learning activities, a pre-test of those skills was given be- 
fore starting a series of modules. That pre-test information was then 
entered into each student's file and the system controlled module entry 
based on the results of the pre-test. 

With minor changes in some of the computer programs, the pre-test 
information could be used to bypass modules instead of permitting entry 
to those modules . This mode of operation would require that the pre- 
test test the objectives of each module the student was planning to study. 

The key component of the learning styles based system is the output 
of learning prescriptions in which the activities for each objective 
are listed in sequence of decreasing compatibility with the student f s 
learning styles. Although the application in which the system was tested 
required that all activities be presented to all students, it is feasible 
to list only the first few activities for each objective, thereby pre- 
scribing only those activities which best match the styles of the learner. 

Appendix L shows learning prescriptions for two students entering 
the same module. For the two style continua used in the test one student • 
placed average on the symbolic-concrete continuum and toward the un- 
structured end of the other continuum. That student was given a supple- 
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rental reading as his best activity for objective #1. The other 
student placed toward the synbolic end of one continuum and toward the 
structured end of the other continuum. That student was given a taped 
mini-lecture as his best activity for objective #1. If the supplemental 
reading is more unstructured and the taped mini -lecture is more structured 
in nature one would expect those activities to be assigned to the respect- 
ive students. 

A critical phase in the prescriptive process concerns the procedure 
by which each activity was placed on the two style continua. For this 
test each activity was analyzed by the investigator and assigned a position 
on the style continua. Although analysis from several experienced teachers 
would be more valid, other methods utilizing feedback within the system 
should be considered. 
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APPENDIX A 



LNPOFMATICN NECESSARY TO INDIVIDUALIZE 
INSTRUCTION BASED ON LEARNING STYLES 

Information Associated With Each Student 

1 . Initial program, history of program changes and current status . 

a) List of modules in program. 

b) Planned dates of entry and exit from each module. 

c) Noted changes in program. 

d) Current status or amount of program completed. 

2. Learning styles and accumulated styles information. 

a) Information from learning styles questionnaire. 

b) Acamulated data on styles actually used. 

3. Accunulated module entry skills. 

a) List of basic or unique skills demonstrated before entry 
to each module. 

4. Accumulated test results on current module. 

a) List of all items and responses that have appeared on 
tests on the current module. 

b) Information necessary for constructing subsequent tests. 

Information Associated With Each Module 
* 1. Entry skills and prerequisites. 

a) List cf prerequisite modules. 
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b) List of basic or uiique skills used in the module and needed 

by students before entry to that module. 
Objectives with available learning experiences. 

a) List of behavioral objectives. 

b) List of various activities associated with and/or 
keyed to the objectives. 

c) Information or algorithm relating the measured learning 
styles to the various learning activities. 

Pool or test items. 

a) Several items for each objective. 
Accumulated information on tests. 

a) Usage, difficulty and correlation of items and groups of 

items associated with objectives. 
Accumulated information on use of learning activities - 
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PLOW OP STUDENT ACTIVITIES 



Q START ^ 



1) Plan program 

2) Learning styles q. 

3) Pretest 
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Enter name 
t program 
into coop. 
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N m first 
module in 
program 




no 



Output 
learning 
activities 
prescription 
for module M 
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M » next 
module in 
program 



Output 

entry 
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LEARN I 
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Review 
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not passed 


Perform 
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listed in 
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Satisfy 
entry 
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LIST OF CONPUTER PROGRAMS FOR STUEENT USE 



Program Name Program Function 

MAINST - - - main student program used to identify a student with his 
file and chain to the program he selects. After that pro- 
gram has been executed the system will chain back to this 
program and wait for another user. 

enter a new name in the student file in alphabetical order 
and initialize an individual file for that name. 

enter or change a program of study for a student. This pro- 
gram will be used by students to enter their planned program 
of study into their file and update any changes in that pro- 
gram. 

list the program of study for a particular student. This 
program provides a list of planned modules and expected start- 
ing dates in a students program of study. 

print out a summary of the history and current status of a 
student. This program lists all of the modules a student 
has completed with dates of completion and the level of 
achievement for each module. The report includes the status 
of the student on his current module; 

print out the learning prescription for the next module of a 
students program. This program will use the learning style? 
information from the questionnaire to select those learning 
activities which most closely match the students style of 
learning. 

TESTER provides a mastery test on the current module. This program 

will present the student with a test on a CRT. As the student 
responds to the items, they are graded and the results are 
stored in his file. The program will either record if the 
student passes the module or provide feedback about which 
objectives require additional study. 
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LIST OF COMPUTER PROGRAMS FOR INSTRUCTOR USE 



Program Name 

DROPER 

EXPUSE 

mdmdd 

NODSUM - 



Program Function 

delete a student from the system. 

print out the expected module entry report.. 

enter a new nodule in the module file or delete an 
old module. 

print out a module surmary showing the basic features 
of all modules. 

MODUPD add, delete or update activities for an existing module. 

M3DUSE - - - print out the current module use report. 
NAMLST print out list of students enrolled. 

PRGfiES - - - print out the progress list report which shows the current 
standing of all students. 

SKILLS add, delete or update entry skills. 

TESTUP - - - add, delete or update test items in the test file. 
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APPENDIX F 
Computer Program Listings 



MAINST 01(02 PM 18-JUN-74 
1000 0N ERR0R G0 T0 6000 
1010 PRINTi PRINT! PRINT 

1085 PRINT" 1 - ENR0LL/ 2-PR0GRM/ 3-PGMLST/ 4- STATUS* 5-NXTM0D/ 6- TESTER 

1500 PRINTS PRINTi INPUT N9 X 

1 510 IF N9 X> 1 THEN 1520 

1515 PRINT "VAIT"t CHAIN "ENR0LL" 

1 520 C8-0 

1 540 INPUT "NAME PLEASE"; N1S 
1 560 L-LEN(NIS) 

1 570 0PEN "STUDNT" F0R INPUT AS FILE 1/ M0DE 1 
1580 DIM §\* NS( 400*2) 
1 590 N*VAL<NS<0/0)) 
1600 F0R J»l T0 N 

1610 IF LEFT<N1 S/L)»LEFT<NS< J/ 0>/L> THEN 1710 
1620 NEXT J 

1630 PRINT "S0RRY - BUT I CAN'T FIND Y0UR NAME 0N THE CLASS LIST." 

1640 PRINT "PLEASE USE THE SAME NAME UNDER WHICH Y0U ENR0LL ED" 

1650 PRINT "0R TRY ENTERING Y0UR LAST NAME 0NLY." 

1660 C8-C8+1 

1670 CL0SE 1 

1680 IF C8<3 THEN 1540 

1690 PRINT "SEE AN INSTRUCT0R F0R A P0SSIBLE ERR0R." 
1700 G0 T0 9990 

1710 IF LEFT<NlS/LX>LEFT<NS{J+l/0)/L) THEN 1780 

1730 PRINT "THE NAME Y0U ENTERED IS EQUAL T0 B0TH 0F THE F0LL0WING." 
1740 PRINT NS<J/0)t PRINT NS<J+l/0)i PRINT "TRY AGAIN" 
1 760 CL0SE 1 
1770 G0 T0 1540 

1780 N1S»NS<J/0>1 N2S*NS(J/l)t N3S-NS<J/2> 
1790 CL0SE 1 

1800 PRINT "C0NFIRM "; N1SJ " "J N2S 

1810 INPUT "TYPE Y 0R N"J N9S 

1820 IF N9S<>"Y" THEN 9990 

1830 0PEN "TMP" AS FILE 9 

1840 PRINT §9* NIS; *** "J N3S 

1850 CL0SE 9 

1860 PRINT "WAIT" 

1870 0N N9X G0 T0 3100/ 3200/3300/3400/3500/3600 

3100 CHAIN "ENR0LL" 

3200 CHAIN "PR0GRM" 

3300 CHAIN 'TGMLST" 

3400 CHAIN "STATUS" 

3500 CHAIN "NXTM0D" 

3600 CHAIN "TESTER" 

6000 IF ERR<> 19 THEN 0N ERR0R G0 T0 0 

6010 PRINT "WAITING"! SLEEP 5 

6020 RESUME 

9990 CHAIN "MAINST" 

9999 END 



READY 



ENR0LL 01x09 PM 18-JUN-74 
1000 0N ERR0R 60 TO 6000 

1020 PRINT "PLEASE TYPE YOUR LAST NAME FIRST** 

1030 INPUT "THEN SPACE AND FIRST NAME"; N1S 

1040 PRINT "CONFIRM "* NISt INPUT "TYPE Y 0R N"; N9S 

1050 IF N9S<>**Y" THEN 1020 

1060 INPUT "PLEASE TYPE Y0UR 1 D-NUMBER"! N2S 

1070 PRINT "C0NFIRM "J N2St INPUT "TYPE Y 0R N"t N9S 

1080 IF N9S<>**Y" THEN 1060 

1090 0PEN "STUDNT" F0R INPUT AS FILE 1* M0DE 1 

1100 DIM *\» N$<400,2> 

1 110 N»VAL<N$<0*0>> 

1120 F0R J«l T0 N 

1130 I F N 1 $<N $< J* 0) THEN 1200 

1140 I F N 1 $>N$( J* 0) THEN 1180 

1150 PRINT **Y0UR NAME ALREADY EXISTS IN THE FILE" 

1160 PRINT "PLEASE CONTACT AN INSTRUCTOR BEF0RE ENROLLING." 

1 170 CL0SE It 60 T0 9990 

1 180 NEXT J 

1190 Jl-N+ll 60 T0 1225 
1200 F0R Jl-N T0 J STEP -1 

1210 F0R K»0 T0 2t NSv J 1+ 1*K)*N S( J 1 «K) t NEXT K 
1220 NEXT Jl 
1225 J9»0 
1230 J9-J9+1 

1235 N3$»LEFT(N1$*4)+NUM$(J9) 
1240 F0R K»l T0 N 
1250 IF N3$«N$(K*2) THEN 1230 
1260 NEXT K 

1270 N$(Jl*0)«Nl$t NS'.Jl* l)»N2$t NSC J \, 2>«N3Sl NSC 0, 0)«NUMSCN+ 1 > 
1280 CL0SE 1 

1290 0PEN N3S AS FILE 2* CLUSTERSIZE 2 

1300 DIM #2* PXC20)* DXC20)* SXC30)* D1XC30)* D2XC30)* C1C30)* 

LX< 2)* EXC30), TX< 1*120) 
1310 PX(0)«Ot SXC0> = 0t Cl(0)*Ot EXC0>»0 
1320 TX(0*0)«Ot TX(l*i20)»0 
1 330. CL0SE 2 

1340 PRINT "ENROLLMENT 0F "; N1S; " IS COMPLETE" 
1 345 PRINT "WAIT" 
1350 60 T0 9990 

6000 IF ERR<>19 THEN ON ERROR 60 TO 0 

6010 PRINT "VAITIN6"! SLEEP 5 

6020 RESUME 

9990 CHAIN "MAIN ST" 

9999 END 

READY 
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PR0GRM 01:20 PM 18-JUN-74 
1000 0N ERR0R 60 T0 6000 

1010 0PEN "TMP" F0R INPUT AS FILE 9* H0DE 1 
1020 INPUT #9# N1S, N3S 
1030 CL0SE 9 

1040 0PEN N3S F0R INPUT AS FILE 1/ H0DE 1 

1050 DIM i\, PX<20>* DX<20>* SX<30>, D1X<30>* D2X<30>* CI (30)/ 

LX( 2>* EX<30>* TX< 1*120) 
1060 IF PX<0)-0 THEN 1200 

1070 PRINT "Y0UR CURRENT PR0GRAM EXISTS 0F THE F0LL0 WIN G H0 DULES: " 
1080 F0R K-l T0 PX<0>: PRINT PX<K>: NEXT K 

1090 PRINT "DID Y0U INTEND T0 CHANGE 0R LENGTHEN THAT PR0GRAM" 
1100 INPUT "TYPE Y 0R N"; N9S 
1110 IF N9S<>**Y" THEN 9990 
1120 IF SX(0><>0 THEN 1130 

1122 PRINT "Y0UR CURRENT PR0GRAM IS N0V DELETED** 
1124 PRINT "START ENTERING Y0UR NEW PR0GRAM** 
1126 G0 T0 1200 
1130 K*SX(0> 

1140 PRINT **Y0UR NEW PR0GRAM MUST START AFTER M0DULE #"1 SX(K) 
1150 PRINT "ALL M0DULES AFTER"! SX(K)1 "ARE NEW DELETED." 
1160 F0R L-l T0 PX(0> 
1170 IF SX(K)=PX(L) THEN 1190 

1180 NEXT L: PRINT "ERR0R IN PR0GRM AT LINE 1180": G0 T0 9990 
1190 PX(0)»1: PX(1)>PX(L>: DX(1)-DX(L> 

1200 PRINT "ENTER M0DULE NUMBERS IN THE SEQUENCE IN WHICH Y0U" 

1210 PRINT "PLAN T0 C0MPLETE THEM. ALS0 ENTER THE DATE Y0U PLAN" 

1220 PRINT "T0 START EACH MODULE* LAST M0DULE NUMBER SH0ULD BE" 

1225 PRINT "ZER0 T0 TERMINATE PR0GRAM ENTRY.": PRINT 

1230 IF SX(0)>0 THEN C8-2 ELSE C8-1 

1240 F0R K-C8 T0 30 

1250 INPUT "M0DULE #"1 Ml 

1252 F0R K9»l T0 PX<0) 

1254 IF MK>PX(K9) THEN 1258 

1256 PRINT Mi; "IS ALREADY INCLUDED": G0 T0 1250 

1258 NEXT K9 

1260 IF Ml-0 THEN 1640 

1270 0PEN "M0DULE" F0R INPUT AS FILE 2* M0DE 1 
1280 DIM #2* MXC40)* Ml$<40)»8* M$<40)»32* C2C40)* 
D3X<40*1>* RX<40*3>* KX<40*10) 

1290 M»MX(0) 

1300 F0R L»l T0 M 

1310 IF MXCD-Ml THEN 1350 

1320 NEXT L 

1330 CL0SE 2 

1340 PRINT "M0DULE #"; Ml; "IS N0T AVAILABLE": G0 T0 1250 
1350 IF RX<L*0)»0 THEN 1510 
1360 IF K>1 THEN 1410 

READY 
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1370 PRINT "THAT M0DULE HAS THE F0LL0 VIN6 PREREQUISITE M0DULECS>l" 

1360 F0R Kl-1 T0 RX(L,0)l PRINT RXCL*Kl)t NEXT Kl 

1390 CL0SE 2t PRINT "SELECT AN0THER H0DULE 0R ENTER ZER0. M 

1400 60 T0 1250 

1410 F0R Kl»l T0 RX(L,0) 

1420 F0R K2>1 T0 PXCO) 

1430 IF RXCL«K1)-PXCK2) THEN 1500 

1440 IF SX(0)-0 THEN 1480 

1450 F0R K3-1 T0 SXCO) 

1460 IF RX(L*K1)»SX(K3) THEN 1500 

1470 NEXT K3 

1480 NEXT K2 

1490 60 T0 1370 

1500 NEXT Kl 

1510 Dl»D3XCL*0)l D2»D3XCL*l)l CL0SE 2 

1515 C9«0 

1520 60 SUB 7000 

1530 IF X8X»D1 AND X8X<D2 THEN 1590 
1540 IF C9-0 THEN 1570 
1 545 X8X*D1 

1550 PRINT "FIRST DATE AVAILABLE HAS BEEN ENTERED." 
1 560 60 T0 1 590 

1570 PRINT "STARTIN6 DATE 0UTSIDE M0DULE AVAILABILITY - TRY AGAIN* " 
1560 C9-1* 60 T0 1520 
1590 IF D2-X8X>4 THEN 1620 

1600 PRINT "VARNIN6 - Y0U HAVE 0NLY"i D2-X8 W "DAYS" 
1610 PRINT "T0 C0MPLETE M0DULE"! Ml 
1620 PX(K)»Mll PX(0)»Kl DX(K)»X8X 
1630 NEXT K 

1640 IF PX(0)»0 THEN PRINT "N0 PR06RAM ENTERED" ELSE 

PRINT "PR06RAM ENTRY IS C0MPLETE" 
1645 PRINT "WAIT" 
1650 60 T0 9990 

6000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
6010 PRINT "WAITIN6": SLEEP 5 
6020 RESUME 

7000 X 1 $* "JAN FEBM ARAPRM AY J UN J ULAU6S EP0 CTN0 VDEC" 

7010 X2S= "0000310 59090 120 151 18 121 2243273304334" 

7020 X3$« "00 000 3 6 50 7 30 1 09 5" 

7030 INPUT "STARTIN6 M0NTH-XXX"; X4S 

7040 X5X-INSTRC 1*X1 S/LEFTCX4S* 3) ) 

7050 INPUT "DAY"i X6X 

7060 X7X»VALCMIDCDATESC0>*8*2>> 

7070 X8X-VALCMI D(X2$*X5X* 3) 7AL(MI D(X3$# (X7X-73)*4-3* 4) )+X6X 
7080 RETURN 

9990 CL0SE 1» CHAIN "MA IN ST" 
9999 END 

READY 
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Program: PGMLST 



CURRENT PROGRAM 

xxxxxxxxxxxxxxxx 

999-99-9999 
99-XXX-99 



NUMBER 



MODULE DESCRIPTION 



CREDITS STARTING DATE 



999 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX .9 99 XXX 99 

999 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX .9 99 XXX 99 



1. This program will list only those modules that exist in 
the current program. Modules completed before a 
program change will be included in a 'STATUS' list. 

EXAMPLE: 



CURRENT PROGRAM 
JOHNSON BIG J 
123-45-6789 
17-MAR-74 

NUMBER MODULE DESCRIPTION CREDITS STARTING DATE 

110 LINEAR MOTION AND TRAJECTORIES .5 25 DEC 84 

115 VECTORS AND FORCES .4 15 JAN 85 
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PGMLST 01:29 PM 18-JUN-74 
1000 0N ERR0R G0 T0 6000 

1010 0PEN "TMP" F0R INPUT AS FILE 9* M0DE 1 
1020 INPUT #9, N1S, N3S 
1030 CL0SE 9 

1040 0PEN N3S F0R INPUT AS FILE I* M0DE 1 

1050 DIM §\» PX<20>, DX(20>, SX<30>* D1XC30)* D2XC30)* CK30)* 

LX( 2)* EX<30>, TXO/120) 
1060 IF PX(0)>0 THEN 1080 

1070 PRINT "N0 PR0GRAM EXIST F0R M J Nl$l G0 T0 9990 
1080 PRINTl PRINTl PRINT "CURRENT PR0GRAM" 
1090 PRINT N1S: PRINT DATES(O) : PRINT 

1100 PRINT "NUMBER"; TAB(16); "M0DULE DESCRIPTI0N"; TABC43); 

"SIZE STARTING DATE"l PRINT 

1110 0PEN "M0DULE" F0R INPUT AS FILE 2* M0DE 1 
1120 DIM #2* MXC40)* M1SC40>*8* M$(40)=32* C2<40>> 

D3X(40*1)* RX<40,3>> KX(40*10) 
1 130 F0R K=l T0 PXCO) 
1 140 F0R L=l T0 MXCO) 
1150 IF MX(L)=PX(K) THEN 1190 
1 1 60 NEXT L 

1170 PRINT TAB( 2) * PX(K>; "D0ES N0T EXIST IN FILE" 
1 180 G0 T0 1210 
1 190 G0SUB 7000 

1200 PRINT TAB(l); PX(K); TABC9); MS(L>; TABC45); C2(L); TAB(54); 

Y2X; MID(Xl$*Z-3* 3); Y1X 
1210 NEXT K: PRINT: PRINT: PRINT: CL0SE 2: G0 T0 9990 
6000 IF ERR<>19 THEN 0N ERR0R G0 T0 0 
6010 PRINT "WAITING": SLEEP 5 
6020 RESUME 

7000 X 1 $= " J AN FEBM ARAP RMAYJ UN J UL AUG SEP0 CTN0 VDEC " 
7010 X2S="0000310590901201 51 18 1 21 2243273304G34" 
7030 Y2X=DX(K): Yl X=(Y2 X- 1 >/365+ 74 
7040 IF Y2X<366 THEN 7060 
7050 Y2X»Y2X-365: G0 T0 7040 
7060 F0R Z=l T0 39 STEP 3 

7070 IF Y2X< = VAL(MI D(X2$* Z* 3) ) THEN 7090 
7080 NEXT Z 

7090 Y2X»Y2X-VAL(MI DCX2S/Z-3* 3)) 
8 000 RETURN 

9990 CL0SE 1: CHAIN "MAIN ST" 
9999 END v 

READY ' 
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STATUS 0It32 PM 18-JUN-74 
1000 0N ERR0R 60 T0 6000 

1010 0PEN "TMP" F0R INPUT AS FILE 9* M0DE 1 
1020 INPUT #9, N1S* N3S 
1030 CL0SE 9 

1040 0PEN N3S F0R INPUT AS FILE I* M0DE 1 

1050 DIM §\* PXC20), DX<20>, SX<30>, D1X(30>* D2XC30)* CK30)* 

LS( 2)* EX<30>, TX( 1*120) 
10.60 PRINTt PRINTt PRINT 

1070 PRINT "STATUS 0F "J N 1 Si TABC34)J DATESC 0) t PRINT 
1080 IF SX(0)>0 THEN 1100 

1090 PRINT "HAS N0T YET STARTED A M0 DULE"t 60 T0 9990 

1100 PRINT "M0DULE STARTED FINISHED LEVEL SIZE"t PRINT 

1 110 F0R K-l T0 SX<0) 

1120 X8X-D1XCX) 

1 130 60 SUB 7000 

1140 Z1-Y2XI Z2S»MIDCXlS,Z-3* 3) t Z3»Y1X 
1150 IF D2X(K)>0 THEN 1180 

1160 PRINT TABC1>J SXCX)J TAB(8)J Zlt Z2$; Z3 
1170 60 T0 1230 
1180 X8X»D2XCK) 
1 190 60 SUB 7000 

1200 Z4-Y2XS Z5S-MIDCX1S/Z-3, 3) t Z6»Y1X 

1210 Z7X-INTCC1CK)) 

1215 Z8-INT( (C1(K)-Z7X)*10*. 5)/ 10 

1220 PRINT TABC1>J SXCX)J TAB ( 8 ) J ZIJ Z2SJ Z3J TABC19)J 

Z4; Z5$; Z6J TABC31)! Z7W TABC38)J Z8 
1230 NEXT Kt PRINTt PRINTt PRINTt 60 T0 9990 
6000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
6010 PRINT "VAlTIN6"t SLEEP 5 
6020 RESUME 

7000 X1S«"JANFEBMARAPRMAYJUNJULAU6SEP0CTN0VDEC" 

7010 X2S*"0 0 0 0 31059 090 1 201 51 18 1 212 2 432 7 330 4 3 34" 

7030 Y2X»X8Xt Yl X-CY2X- 1 )/365+74 

7040 IF Y2X<366 THEN 7060 

7050 Y2X-Y2X-365t 60 T0 7040 

7060 F0R Z-l T0 39 STEP 3 

7070 IF Y2X<-VALCMIDCX2S*Z*3>> THEN 7090 

7080 NEXT Z 

7090 Y2X-Y2X-VALCMI DCX2S*Z-3* 3)) 
8000 RETURN 

9990 CL0SE It CHAIN "MAIN ST" 
9999 END 

READY 



9 

ERIC 



F-7 

49 



NXTM0D 01t42 PM 18-JUN-74 
1000 0N ERR0R.G0 T0 6000 

1010 0PEN "TNP" FIR INPUT AS FILE 9* M0DE 1 
1020 INPUT #9, N1S* N3S 
1030 CL0SE 9 

1040 0PEN N3S F0R INPUT AS FILE I* M0DE 1 

1050 DIM #1* PXC20), DXC20)* SXC 30) # D1XC30), D2XC30), C1C30), 

LX( 2)* EX<30), TXC 1,120) 
1060 C7»PXC0)l C8»SX<0) 
1070 IF C7>0 THEN 1100 

1080 PRINT "S0RRY - N0 PR0GRAM EXISTS F0R N1S 

1090 G0 T0 9990 

1 100 IF C8<>0 THEN 1120 

1 110 K-Ot G0 T0 1210 

1120 IF D2X(C8)-0 THEN 1230 

1130 IF PXC C7X>SXCC8> THEN 1170 

1140 PRINT "S0RRY - Y0UR PR0GRAM IS COMPLETED* Y0U MUST" 

1150 PRINT "ENTER A PR0GRAM A DDI TI0N BEF0RE CONTINUING." 

1160 G0 T0 9990 

1170 F0R K»l T0 C7 

1180 IF PX(K)»SX(C8) THEN 12l6 

1190 NEXT K 

1200 PRINT "ERR0R IN ENTRY AT 1200"t G0 T0 9990 

1210 W=Oj C8=C8+lt SX(0)»C8 

1220 SX( C8)=PX(K+ 1) t D2X(C8)»0t G0 T0 1235 

1230 V-l 

1235 M»SX<C8) 

1240 G0SUB 5000 

1250 G0SUB 7000 

1260 IF X8X<«M7X THEN 1278 

1270 PRINT "M0DULE #"; M4XJ "IS N0 L0NGER AVAILABLE"! G0 T0 9990 

1274 IF V-l THEN 1280 

1278 DlX(C8)»X8Xt C1CC8)*M9 

1280 C9»0 

128 5 DIM SI (10) 

1290 IF M8X(0)»0 THEN 1350 

1300 F0R Kl«l T0 M8XC0) 

1310 F0R K2« l T0 EX(O) 

1320 IF M8X(K1)>EX(K2) THEN 1340 

1330 NEXT K2t C9»C9*ll SI ( C9)»M8 XCK1 ) 

1340 NEXT Kl 

1350 IF C9-0 THEN 8000 

1360 PRINTt PRINTt PRINT 

1370 PRINT "PRETEST ITEMS F0R" 

1380 PRINT "M0DULE #"; M4X; M6S> PRINT 

« 

READY 
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PSCPTN 1 1 s 0 A' AM 14-AUG-74 

1000 ON ERROR GO TO 6000 

1010 OPEN "TMP" FOR INPUT AS FILE 9, MODE 1 

1020 INPUT #9, NS, Sl> S2, MX, MIS, MS 

10 30 CLOSE 9 

1040 OPEN MIS FOR INPUT AS FILE 2, MODE 1 

1050 DIM #2, AX<50>, S1X<50>, S2X(50), AS<50> = 64 

1060 DIM A8X<50>, S8X<50>> S9X(50), A8S<50>=64 

. 1065 DIM X(50) 

1070 N»AX<0> 

1080 FOR J=l TO N ' 

» 1090 A8X(J)= AX(J) 

1100 S8X(J)=S1X(J) 

1110 S9X(J)=S2X(J) 

1 120 A8S(J)= AS(J) 

1 1 3e NEXT J 

1 1 40 CLOSE 2 

1 1 50 FOR J= 1 TO N 

1160 X(J)=S1*S8X(J)+S2*S9X(J) 

1 165 D=SQR((Sl*Sl+S8X(J)t2)*(S2.*S2+S9X(J)t2)? 

1 167 IF D=0 THEN D=1000 

1 170 X(J)=X(J)/D 

1 180 NEXT J 

1190 PRINT: PRINT: PRINT 

1200 PRINT "LEARNING ACTIVITIES PRESCRIPTION FOR: M ; NS 

1 205 PRINT Si;S2 

1210 PRINT "MODULE »"i MX; Ms; " "; DATES (0 ) : PRINT 

1215 PRINT "OBJ ", "ACTIVITY" 

-1220 K=*l : J= 1 

1230 IF INT(A8X(K+1 ) / 1 0 ) <> A8X ( K ) / 1 0 THEN 1300 

1240 K=K+1 

1250 GO TO 1230 

1300 IF J=K THEN 1400 

1310 FOR L1=J TO K-l 

1320 FOR L2=L1+1 TO K 

1330 IF X(L2XX(L1) THEN 1370 

1340 A8X( 0)=A8X(L2): A8S( 0)=A8S(L2): X( 0)=X(L2) 

1350 A8X(L2)=A8X(L1 ) : A8S (L2)»A8S(L 1 ) : X(L2)=X(L1) 

1360 A8X(L1)=A8X( 0): A8S(L1)=A8S( 0)s X(L1)=X( 0) 

1370 NEXT L2 

1380 NEXT LI 

1400 PRINT INT(A8X(J)/10) 

* 1410 FOR L=J TO K 

1420 PRINT " "; A8X(D- 1 0* INT( A8X (L ) / 1 0 ) ; A8S(L); 

1 430 NEXT L 

* 1440 IF K>=N THEN 9990 
1450 K=K+1: J=K: GO TO 1230 

6000 IF ERR<>19 THEN ON ERROR GO TO 0 

6010 PRINT "WAITING": SLEEP 5 

6020 RESUME 

9990 PRINT: PRINT: PRINT: CHAIN "MAINST" 

9999 END 

READY 
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1390 0PEN "SXLFIL" F0R INPUT AS FILE 3* M0DE 1 

1400 DIM #3* FX(30)« FS(30)»64 

1410 F0R Kl-1 T0 C9 

1420 F0R K2»l T0 FX(0) 

1430 IF S1(K1)>FX(K2) THEN 1460 

1440 NEXT K2 

1450 PRINT SI (XI) I G0 T0 1470 
1460 PRINT SKKl); FS(K2) 

1470 NEXT Kit CL0SE 3l PRINTl PRINTl PRINT 
1490 G0 T0 9990 

5000 0PEN "M0DULE" F0R INPUT AS FILE 2* M0DE 1 
5005 DIM §2* MX(40)* MlS(40)-8« MS(40)»32* C2(40)« 

D3X(40*1)* RX(40*3)* KX(40*10) 
5010 DIM M8X(10) 
5015 F0R J»l T0 MX(0) 
5020 IF M=MX(J) THEN 50 30 

5025 NEXT Ji PRINT "M0D l"J N " IS MISSING"! CL0SE 2i G0 T0 9990 
5030 M4X-MX(JM M5S»MlS(J)t M6S-MS(J)'; M7X=D3X( J* 1 ) I M9»C2(J) 
5035 F0R K-0 T0 lOt M8 X(K)-KX( J*X) t NEXT X 
5040 CL0SE 2 
5050 RETURN 

6000 IF ERR<>19 THEN 0N ERR0R G0 T0 0 
6010 PRINT "WAITING"! SLEEP 5 
6020 RESUME 

7000 X 1 $« "J AN FEBMARAPRMAY J UN J ULAUG SEP0 CTN0 V DEC" 

7010 X2S«"000031059090120151 181212243273304334" 

7020 X3S«"0000036507301095" 

7030 CHANGE MI D( DATES(O)* 4» 3) T0 X4X 

7034 X4X(2)»X4X(2)-32i X4X( 3)»X 4X( 3)- 32 

7036 CHANGE X4X T0 X4S 

7038 X5X-INSTR(1*X1$*X4$) 

7040 X6X»VAL(MID(DATES(0), l,2))i X7X= VAL(MI D( DATE$(0)*8* 2) ) 
7050 X8X»VAL(MI D(X2$*X5X, 3) ) + VAL(MI D(X3$* (X7X-73)*4-3* 4) )+X6X 
7060 RETURN 

8000 0PEN "TMP" AS FILE 8 

8010 PRINT #8* N1S","LX(1)"*"LX(2)","M4X","M5S","M6S 
8020 CL0SE 1/8 

8030 PRINT "WAIT"! CHAIN "PSCPTN" 
9990 CL0SE It CHAIN "MAIN ST" 
9999 END 

READY 
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DROPER 01:49 PM 18-JUN-74 
1000 ON ERR0R 60, TO 6000 
1540 INPUT "NAME TO BE DROPPED**! N1S 
1560 L«LEN<N1S> 

1570 OPEN "STUDNT" FOR INPUT AS FILE 1* MODE 1 
1580 DIM t\, NSC400,2> 
1590 N»VALCNSCO,0>> 
1600 FOR J*l TO N 

1610 IF LEFTCN1S;L)-LEFTCNSCJ«0)«L) THEN 1710 
1620 NEXT J 

1630 PRINT "CAN *T FIND NAME** 
1650 GO TO 9990' 

1710 IF LEFTCN1S*L)<>LEFTCNSCJ«-1*0>,L> THEN 1800 

1 730 PRINT -THE NAME YOU ENTERED IS EQUAL TO BOTH OF THE FOLLOWING. ** 
1740 PRINT N$(Jj.O)t PRINT NSCJ+l«0)t PRINT **TRY AGAIN** 
1760 CLOSE 1 
1770 GO TO 1540 

1800 PRINT "CONFIRM **JNSCJ,0)J ** **J NSCJ, 1) 
1810 INPUT "TYPE Y OR N**J N9S 
1820 IF N9S<>**Y** THEN 9990 
1830 FS-NSCJ«2) 
1840 FOR J1»J TO N 

1850 NS(J1,0)*NSCJ1 + 1,0) 
I860 N$(J1/1)-N$(J1+1/1) 

1870 NS(J1«2)-NSCJ1 + 1«2) 

1880 NEXT Jl 

1890 KILL FS 

1895 N$(0*0)»NUM$(N-1) 

1900 GO TO 9990 

6000 IF ERR<> 19 THEN ON ERROR GO TO 0 
6010 PRINT "WAITING**: SLEEP 5 
6020 RESUME 
9990 CLOSE 1 
9999 END 

READY 
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Program: EXPUSE 



EXPECTED MODULE ENTRY 
• BY DATE - 





DATE 






MODULE (NBR OF 


STUDENTS ) 




99 


XXX 


99 


999 


(999) 


999 (999) 


999 (999) 


999 (999) 


99 


XXX 


99 


999 


(999) 


999 (999) 


999 (999) 


999 (999) 


99 


XXX 


99 


999 


(999) 


999 (999) 


999 (999) 


999 (999) 



1. The dates are uniformly incremented in chronological 

order - possibly every Monday or every Monday and Wed. 

2. The Mod(nbr of students) are listed from left to right 

in decreasing nbr of students. 



EXAMPLE: 



25 JAN 74 
2 FEB 74 
9 FEB 74 



111(52) 
301(70) 
120 (35) 



301(25) 
112 (32) 
111(14) 



118 (16) 
301(5) 



403(12) 



MEANS: 

52 Students plan to start module 111 on or about Jan 25 

25 Students plan to start module 301 on or about Jan 25 

5 Students plan to start module 301 on or about Feb 9 

etc. 
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E(PUSE OlJ 57 PM 18-JUN-74 
1000 0N ERR0R G0 T0 6000 
1010 DIM AXC20, 20) 
1020 MAT AX'ZER 

1030 PRINT -ENTER M0NTH(XXX) AND DAYC99) Y0U WANT REP0RT T0 START" 
1040 INPUT X4S, X6X 
1045 X9X-7 

1 060 X 1 $» ".IAN FEBM ARAP RM AY J UN J UL AUG S EP0 CTN0VDEC" 
1070 X2S»"0 000 31 05909 01 20 1 51 18 1 21 2243273304334" 
1080 X5X«INSTR<1,X1S,LEFTCX4S, 3)) 
1090 X7X»VALCMIDCDATESC0),8,2)) 

1 100 X8X»VAL(MID(X2$*X5X* 3) XVALCMI DCX3S, CX7X-73)*4-3, 4) )*X6X 
1120 AXC1,0)»X8X 

1130 F0R J*2 T0 20l AX( J, 0>.=AX< J- I, 0>+X9 X» NEXT J 
1140 0PEN "STUDNT" F0R INPUT AS FILE I* M0DE 1 
1150 DIM i\» NSC 400, 2) 
1160 N-VAL<NS<0,0>> 
1170 F0R J«l T0 N 

1200 0PEN N:UJ/2) F0R INPUT AS FILE 2* M0DE 1 

1210 DIM #2* PXC20), DXC20), SXC30), D1XC30), D2XC30), CI (30)* 

LX( 2), EXC30), TX( 1*120) 
1220 IF PX(0) = 0 THEN1370 
1230 F0R K«l T0 PXCO) 

1240 IF DXCKXAXClsO) 0R DX(K) >=AX( 20* 0) THEN 1360 

1250 F0R L»l T0 20 

1260 IF DX(KXAX(UO) THEN 1280 

1270 NEXT L» PRINT "ERR0R AT LINE 1270"l G0 T0 1360 
1280 M=»L- 1 

1290 IF M>AXC0«0) THEN AX(0>OXM 
1300 O-l 
1310 OC+2 

1320 IF C>»20 THEN 1360 

1330 IF AXCM^CXO THEN AX(M* C)»PX(K) 

1340 IF PXCKX>AXCM, C) THEN 1310 

1350 AXCMsC+l)aAXCM'C+l) + l 

1360 NEXT K 

1370 CL0SE 2 

1380 NEXT J 

1390 GL0SE 1 

1400 F0R J»l T0 AX(6*0) 

1410 F0R Kl-2 T0 18 STEP 2 

1420 F0R K2*Kl + 2 T0 20 STEP 2 

.1430 IF AX(J,K2X«AX(J,K1) THEN 1470 

1440 Sl-AXCJ/Kl) t S2»AX(J*K1-1) 

1450 AXCJ,K1XAX(J.>K2) t AXC J,K1- 1 )»AX( J*K2- 1 > 

1460 AX(J*K2)»S1 t AXCJ«K2-1>-S2 

1470 NEXT K2 

1480 NEXT Kl 

1490 NEXT J 

1500 PRINT: PRINTi PRINT 
READY 
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1510 PRINT TAB(20); "EXPECTED M0DULE ENTRY" 
1520 PRINT TAB(23); "- BY DATE -": PRINT 

1530 PRINT " DATE - - - M0DULECNBR 0F STUDENTS) -" 

1540 PRINT 

1600 F0R J-l T0 AXC0*0) 
1610 X8*»AX(J*0) 
1620 60 SUB 7000 

1630 Z1»Y2X: Z2S-MI D(X 1 S* Z- 3* 3) l Z>Y1X 

1640 F0R K»l T0 7 STEP 2 

1650 IF AX(J*K)«0 THEN 1670 

1660 NEXT K 

1670 K»INT<K-l)/2 

1680 A1S»NUMSCAXCJ* 1 ) )«•"( "♦NUMSC AX( J* 2) )♦") " 
1 690 A2$»NUM$(AX( J* 3) )*"("*NUM$(AX( J* 4) )♦") " 
1700 A3$»NUM$(AX( J* 5) )♦"( "+NUMS(AX(J* 6) )♦") " 
1710 A4S«NUMSCAXCJ*7))«-"C"«-NUMSCAXCJ*8))«-")" 
1720 IF K-0 THEN 1740 

1730 0N K 60 T0 1760* 1780* 1800* 1820 
1740 PRINTZi;Z2SJZ3 
1750 60 T0 1830 

1760 PRINTZ1JZ2SJZ3JTABC 15)JA1S 
1770 60 T0 1830 

1780 PRINTZUZ2$;Z3;TAB( 15)JA1S;TAB(28>JA2S 
1790 60 T0 18 30 

1800 PRINTZ1JZ2S;Z3JTABC 15) JA1 $; TAB( 28 ) t A2SJ TAB( 41 ) ; A3S 
1810 G0 T0 1830 

1820 PRINTZ1JZ2SJZ3J TAB ( 1 5) % A 1 $; TAB ( 28 ) J A2 SJ TAB ( 41 ) % A3 SJ TAB ( 54> i A4$ 
1830 NEXT J 
1840 60 T0 9999 

6000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
6010 PRINT "VAITIN6": SLEEP 5 
6020 RESUME 

7000 X 1 S 3 "JAN FEBM ARAPRM AY J UN J UL AUG S EP0 CTN0 VDEC" 

7010 X2$-"0000310590901201 51 181212243273304334" 

7030 Y2X*X8Xl Yl X»(Y2X- 1 )/ 365+74 

7040 IF Y2X<366 THEN 7060 

7050 Y2X»Y2X-365: 60 T0 70 40 

7060 F0R Z~\ T0 39 STEP 3 

7070 IF Y2X<*VALCMIDCX2S*Z*3)) THEN 7090 

7080 NEXT Z 

7090 Y2X»Y2X-VAL(MID(X2$*Z-3*3)) 
8000 RETURN 
9999 END 

READY 



9 

ERIC 



F-14 



56 



M0DADD 02U1 PM 16-JUN- 74 

1000 0*T"ERR0R G0 T0 6000 

1010 PRINT "T0 ENTER A NEW M0DULE TYPE (NEW)" 
1020 PRINT "T0 DELETE AN 0LD M0DULE TYPE (DELETE)" 
1030 INPUT "0THERWISE (EXIT)"; R$ 
1040 IF RS» "DELETE" THEN 1600 
1050 IF RS»"NEV" THEN 1070 
1060 G0 T0 9990 

1070 INPUT "NEW M0DULE NUMBER *"i Ml 
1080 0PEN "M0DULE" F0R INPUT AS FILE 2* M0DE 1 
1090 DIM #2* MX(40), M1S(40)«8, MS(40)«32, C2(40), 
D3X(40, 1), RX(40, 3), KX(40, 10) 

1100 M*MX(0) 

1110 F0R J=l T0 M 

1120 IF MKMX(J) THEN 1200 

1130 IF Ml>MX(J) THEN 1170 

1140 CL0SE 2 

1150 PRINT "S0RRY - BUT THAT M0DULE ALREADY EXISTS." 

1160 G0 T0 9990 

1170 NEXT J 

1180 Jl-M+1 

1190 G0 T0 1290 

1200 PRINT "WAIT" 

1220 F0R J1»M T0 J STEP -1 

1230 F0R K=0 T0 KX(Jl/0) t KX(J1+1,K) = KX(J1«K)S NEXT K 

1240 F0R K»0 T0 RX(J1*0) t RX(jm,K)« RX(J1«K)S NEXT K 

1250 D3X(JU1*0)=D3X(J1*0) t D3X( J I* I* 1 )» D3X( J 1* 1 ) 

1260 C2(J1 + 1) ■ C2(J1) t M$(JU1) > MS(J1) 

1270 M1$(J1 + 1) »M1S(J1) t MX(J1 + 1) «MX(J1)' 

1280 NEXT Jl 

1290 MX(J1)«M1 

1300 INPUT "M0DULE NAME IS"; MS(J1) 

1310 INPUT "M0DULE SIZE IS"; C2(J1) 

1320 INPUT "H0W MANY PREREQUI SITE M0DULES"; C9 

1330 I F C9= 0 THEN 1380 

1340 IF C9<« 3 THEN 1360 

1350 PRINT "LIMIT 0F THREE - TRY AGAIN"! G0 T0 1320 
1360 F0R K«l T0 C9l INPUT "PREREQ NBR IS"; RX(J1/K) 
1370 NEXT K 
1380 RX(J1*0) = C9 

1390 INPUT "H0W MANY PRETEST ITEMS"; C9 
1400 IF C9= 0 THEN 1460 
1410 IF C9<»10 THEN 1430 

1420 PRINT "LIMIT 0F TEN - TRY AGAIN"l G0 T0 1390 
1430 F0R KM T0 C9 

1440 INPUT "PRETEST NUMBER IS"; KXCJ1/K) 
1450 NEXT K 

P.EADY 
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1460 KX(JI,0)*C9 

1470 PRINT "ENTER DATE THIS M0DULE WILL FIRST BEC0ME AVAILABLE*"* 
1480 60 SUB 7000 
1490 D3X(J1,0)»X8X 

1500. INPUT "H0W MANY DAYS WILL THIS M0DULE BE AVAILABLE",* X8 % 
1510 D3X(J1, 1>-D3X(J1,0>+X8X 
1530 C9S»"XMD"+NUMSCM1> 
1540 0PEN C9S AS FILE 4 

1550 DIM #4* AXCSO); S1XC50), S2XC50), A$(50) = 64 

1560 AX(0)»0: ASC50)-" " 

1570 CL0SE 4 

1580 M1SCJ1)»C9S 

1565 MXC0)*MXC0) + 1 

1590 CL0SE 2: 60 T0 9990 

1600 INPUT "M0DULE T0 BE DELETED IS"; Ml 

1610 0PEN "M0DULE" F0R INPUT AS FILE 2* M0DE 1 

1615 M=MX(0) 

1620 F0R J=l T0 M 

1630 IF M1=MX(J) THEN 1670 

1640 NEXT J 

1650 PRINT "THAT M0DULE D0ES N0T EXIST" 
1660 CL0SE 2: 60 T0 9990 
1670 KILL M1SCJ) 
1675 F0R J1=J T0 M 

1680 F0R K»0 T0 KKJI/O) I KX(JbK)- KX(c 1*1*K) t NEXT K 

1.690 F0R K»0 T0 RXCJlsO) t RX(J1*K)= RSC J I* 1 * K) I NEXT K 

1700 D3X(JU0)»D3X(J1 + 1*0): D3X( Jl* 1 ) = D3X(u 1+1* 1) 

1710 C2CJ1) - C2CJ1+1) t MSCJ1) = MS(J1+1> 

1720 M1SCJ1) »M1S(J1+1> t MXCJl) ■ MXCJ1 + 1) 

1730 NEXT Jl 

1740 MX(0)«MX(0)-1 

1745 a0SE 2 

1750 PRINT "M0DULE i"S Mil "HAS BEEN DELETED": 60 T0 9990 
6000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
6010 PRINT "WAITIN6": SLEEP 5 
6020 RESUME 

7000 X 1 J= " JAN FEBMARAPRMAY JUN J UL AU6S EP0 CTN0 VDEC" 
7010 X2$»"000C310 590901 201 51181212243273304334" 
7020 X3$»"0000036507301095" 

7030 INPUT "M0NTH-XXX"; X4S: X5X=INSTR( 1*X1 S*LEFTCX4$j> 3) ) 
7040 INPUT "DAY"; X6X: X7X= VAL(M2 D( DATESCO)* 3* 2) ) 

7050 X8X-VALCMI DCX2S*X5*» 3) >+VALCMI D(X3$* <X7X-73)*4- 3* 4) )+X6% 
7060 RETURN 
9990 END 

READY 
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M0DSUM 02t20 PM 18-JUN-74 
1000 0N ERR0R 60 T0 6000 
1010 PRINTS PRINTt PRINT 

1020 PRINT TABC1DJ "MODULE SUMMARY - "J DATES(O) t PRINT 
1030 PRINT "NBR"JTABC16>J"NAME"JTABC40)J"SIZE AVAILABLE DAYS" 
1040 PRINT 

1050 0PEN "M0DULE" F0R INPUT AS FILE 2, M0DE 1 
1060 DIM §2» MXC40)* M1SC40)*8« MSC40)>32« C2C40)« 

D3XC40#1>* RXC40*3>* KXC40«10) 
1070 F0R J=l T0 MXCO) 
1080 DX-D3XCJ, 1)-D3XCJ«0) 
1090 X8X»D3XCJ*0> 
1100 60 SUB 7000 

1110 Zl«Y2Xt Z2$»MID(Xl$*Z-3*3)l Z3=Y1X 

H20 print mx(J);m$(J);tab(4d; c2(j>;tab(46);zi;z2$;z3; tab(58>; dx 

1130 IF RX(J,0>»0 THEN 1160 
1140 PRINT TABC8); "Q » "J 

1150 PRINT RXCJ*K)J F0R K»l T0 RX(J*0)t PRINT 
1160 IF KXCJ«0)'0 THEN 1190 
1170 PRINT TABC8); "P ■ "J 

1180 PRINT KX(J*K); F0R KM T0 KX(J*0)t PRINT 
1190 PRINT 
1200 NEXT J 
1210 60 T0 9990 

6000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
6010 PRINT "VAITIN6"! SLEEP 5 
6020 RESUME 

7000 XI S«"JANFEBMARAPRMAYJUNJULAU6SEP0 CTN0 VDEC" 

7010 X2S»"000031 0 59090 120 151 181212243273304334" 

7030 Y2X»X8Xt Yl X=(Y2X-1 )/365+74 

7040 IF Y2X<366 THEN 7060 

7050 Y2X«Y2X-365t 60 T0 7040 

7060 F0R Z»l T0 39 STEP 3 

7070 IF Y2X<»VALCMIDCX2S*Z*3>> THEN 7090 

7080 NEXT Z 

7090 Y2X«Y2X-VAL<MIDCX2S*Z-3*3>> 
8000 RETURN 
9990 CL0SE 2 
9999 END 

READY 
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M0DUPD 02t24 PM 18-JUN-74 
1000 0N ERR0R 60 T0 6000 
1010 INPUT "M0DULE NUMBER" M 

1020 0PEN "XMD"+NUMS(M> F0R INPUT AS FILE 2» M0DE 1 
1030 DIM #2* AXC50)* S1XC50), S2X<50>> AS(S0)-64 
1040 N«AX(0) 

10 50 PRINT "T0 ADD 0R REPLACE AN ACTIVITY - ENTER THE ACTIVITY* 

1055 PRINT "NUMBER AND F0LL0V INST F0R STYLES A DESCRIPTI0N." 

1070 PRINT UNEGATIVE ACTIVITY-NUMBER DELETES AN ACTIVITY." 

1080 PRINT "ZER0 ACTIVITY NUMBER TERMINATES UPDATE. " 

1 090 IN?UT "NBR"; A 

1100 IF A-0 THEN 1530 

1110 IF A<0 THEN 1400 

1 130 F0R Jl-1 T0 N 

1140 IF A«AX(J1) THEN 1270 

1150 NEXT Jl 

1160 F0R J-l T0 N 

1170 IF A<AX(J> THEN 1210 

1 180 NEXT J 

1 190 J1=N4-1 

1200 G0 T0 1265 

1210 F0R J1=N T0 J STEP -1 

1220 AS(JIH)> ASCJ1): AXCJ14-1)=AXCJ1> 

1240 S2X(JU1)«S2X(J1)I S1X(JU1)«S1X(J1) 

1260 NEXT Jl 

1265 AXC0>»AXC0>«-1: N-N+l 
1270 AX(J1)=A 

1280 INPUT "STY-1"; SlX(Jl) 

1290 INPUT "STY-2"; S2XCJ1) 

1300 PRINT "DESCRIPTI0N" 

1305 INPUT LINE SS 

1310 IF SS»" " THEN 1090 

1320 ASCJD'SS 

1330 60 T0 1090 

1400 A«-1*A 

1410 IF N»0 THEN 1090 

1420 F0R J=l T0 N 

1430 IF A=AX(J> THEN 1450 

1440 NEXT J» 60 T0 1090 

1450 F0R J I s J T0 N 

1460 ASCJl)* ASCJ1 + 1): AXCJ1> = AX(J1 + 1) 
1470 S2XCJ1> = S2XCJ1«-1>: SI XC J 1 > = SI XC J !♦ 1 ) 
1500 NEXT Jl 

1510 AX(0)»AX(0)-1: N»N-1 

1520 60 T0 1090 „ 
1 530 INPUT "F0R A LIST 0F ALL ACTIVITIES TYPE Y ELSE N* V? N$ 
1 540 IF NS<>**Y" THEN 9990 
1550 PRINTt PRINTt PRINT 

1560 PRINT "ACTIVITIES LIST F0R M0DULE #"; M: PRINT 

1 570 F0R J» 1 T0 N 

1580 PRINT AXCJ>; ASCJ)* 

1590 PRINT TAB(8); "STYLES-"; S1XCJ>; S2X(J) 
1600 NEXT JJ PRINT* PRINT: PRINT* 60 T0 9990 
9990 CL0SE 2 F-18 
9999 END 
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M0DUSE 02i32 PM 18-JUN-74 
1000 0N ERR0R 60 T0 6000 

1010 0PEN "STUDNT" F0R INPUT AS FILE 1/ M0DE 1 

1020 DIM #1* NSC 400, 2) 

1030 N»VAL<NSC0*0)) 

1040 DIM N2SC400)* NXC40/3) 

1050 F0R J«l T0 Nl N2$(J)«N$(J*2)J NEXT J 

1060 CL0SE 1 

1070 0PEN **M0DULE" F0R INPUT AS FILE 3* M0DE 1 
1080 DIM #3* MXC40), M1S<40)»8* MSC40)*32« C2C40)* 
D3XC40*1)* RZ(40#3)> KXC 40*10) 

1090 M-MXCO) 

1100 F0R J=l T0 M : NXCJ#0)*MXCJ) J NEXT J 

1110 CL0SE 3 

1 120 MAT NXyZER 

1 130 F0R J«l T0 N 

1140 0PEN N2SCJ) F0R INPUT AS FILE 2* M0DE 1 

1150 DIM §2» PXC20)* DXC20)* SXC30)* D1XC30)* D2XC30)* CI (30)* 

LX( 2), EXC30), TXC 1*120) 
1160 S=SX(0): P»PX(0) 
1190 IF D2X(S)<>0 THEN 1280 
1200 F0R K=l T0 M 

1210 IF SX(S)»NX(K*0) THEN NXCK* 2)=NXCK, 2) + l 

1220 NEXT K 

1230 IF S<2 THEN 1310 

1235 F0R Kl=l T0 S-l 

1240 F0R K= 1 T0 M 

1250 IF SX(K1)=NX(K*0) THEN N XCK* 1 >«NXCK« 1 )♦ 1 
1260 NEXT K 
1265 NEXT Kl 
1270 G0 T0 1310 
1280 E0R K-l T0 M 

1290 IF SX(S)=NX(K*0) THEN N X(K* 1 )=NX(K* 1 )♦ 1 

1300 NEXT K 

1310 IF P-0 THEN 1500 

1320 IF S=0 THEN 1410 

1330 F0R K=l T0 P 

1340 IF SXCS) =PX(K) THEN 1360 

1350 NEXT K 

1360 IF K=P THEN 1500 

1370 F0R L=l T0 M 

1 380 IF PXCK+1)»NXCL«0) THEN NX(L, 3)=NX(L* 3)+ 1 
1390 NEXT L 
1400 G0 T0 1500 
1410 F0R K=l T0 M 

1420 IF PX(1)=NX(K*0) THEN NXCK, 3)*NX(K* 3) + 1 
1430 NEXT K 
1500 CL0SE 2 
1510 NEXT J 
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1600 PRINT! PRINT! PRINT 

1610 PRINT "CURRENT M0DULE ACTIVITY - "J DATESCO) 
1620 PRINT 

1630 PRINT "M0DULE STUDENTS STUDENTS STUDENTS" 
1640 PRINT "NUMBER FINISHED ACTIVE EXPECTED" 
1650 PRINT 
1660 F0R J«l T0 M 

1670 PRINT NXCJ*0>iTABCll>iNXCJ, 1 >i TABC 21 >JNXC J* 2>J TABC 31 >JNXC J> 3> 
1680 NEXT J 
1690 G0 T0 9999 

6000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
6010 PRINT "WAITING"! SLEEP 5 
6020 RESUME 
9999 END 

READY 
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WHILST 02:39 PM 18- J UN- 74 

1000 0N ERR0R 60 T0 6000 

1010 0PEN "STUDNT" F0R INPUT AS FILE I* M0DE 1 
1020 DIM #1# N$<400,2> 
1030 N»VAL<NS<0,0>> 
1040 F0R J'l TI N 

1050 PRINT NS<J,0>J TAB( 1 6) J NS<J*2> 
1060 NEXT J 
1O7OGL0SE 1 
1080 60 T0 9999 

6000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
6010 PRINT "WAITINe": SLEEP 5 
6020 RESUME 
9999 END 
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PRGRES 02:45 PM 18-JUN-74 
1000 0N ERR0R 60 T0 6000 
1010 PRINT* PRINT: PRINT 

1020 PRINT " PR0GRESS REP0RT - "i DATESC 0) 

1030 PRINT 

1040 PRINT " STUDENT M0DULE STARTED FINISHED" 

1050 PRINT 

1060 0PBI "STUDNT" F0R INPUT AS FILE I* M0DE 1 
1070 DIM §\» NS<400,2> 
1080 N-VAL(NS<0, 0>> 
1090 F0R J«l T0 N 

1 100 0PEN NSC<;«2) F0R INPUT AS FILE 2* M0DE 1 

1110 DIM #2, PX<20>, DX<20>, SX<30>, D1X<30>* D2XC30)* C1C30)* 

LX( 2)* EX<30>, TXC 1*120) 
1120 IF PX(0)>0 THEN 1150 
1 130 PRINT j; NS(J,0> 
1 140 G0 T0 1330 
1 1 50 IF SX(0)>0 THEN 1 180 
1 155 K=l 

1160 print j;nscj«o);tab(21);pxck) 

1 170 G0 T0 1330 
1180 K»SX(0) 

1190 IF D2X(K)>0 THEN 1250 
1200 X8X="D1X(K) 
1210 G0SUB 7000 

1220 Z1-Y2X: Z2S=MI DCX 1 S* Z- 3* 3) : Z3=Y1X 

1230 PRINT JiN$(J*0);TAB<21); sx(k>;tab(29);zi;z2$;z3 

1240 60 T0 1330 

1250 K=SX(0) 

1260 X8X*D1X(K) 

1270 60 SUB 7000 

1280 Z1-Y2X: Z2S=MI DCX 1 S, Z- 3* 3) : Z3=Y1X 
1290 X8X-D2XCK) 
1300 60 SUB 7000 

1310 Z4-Y2X: Z5S=MI DCX1 S, Z-3* 3) : Z6=Y1X 

1320 print j;nscj,o>; TABC21); SXCK)JTABC29>;Zi;Z2S;Z3* 

TAB(41);Z4;Z5S;Z6 
1330 CL0SE 2 
1340 NEXT J 
1350 60 T0 9990 

6000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
6010 PRINT "WAI TIN 6": SLEEP 5 
6020 RESUME 

7000 X 1 S= "JAN FEBMARAPRMAYJUN J ULAU6SEP0 CTN0 VDEC" 
7010 X2$="0000310590901201 51 181212243273304334" 
7030 Y2X=X8X: Yl X» CY2X- 1 >/365+74 
7040 IF Y2X<366 THEN 7060 
7050 Y2X=Y2X-365: 60 T0 7040 
70 60 F0R Z=l T0 39 STEP 3 

7070 IF Y2X<=VAL(MI D<X2$*Z* 3) ) THEN 7090 
7080 NEXT Z 

7090 Y2X»Y2X-VAL(MID<X2$*Z-3* 3) ) 
8000 RETURN 
9990 CL0SE 1 

9999 END F-22 
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SKILLS 02t S7 PM 18-JUN-74 
1000 0N ERR0R G0 T0 5000 

1 010 0PEN "SKLFIL" F0R INPUT AS FILE 3, M0DE 1 
1020 DIM #3* FX<30>* F$(30)»64 
1030 N-FX<0> 

1040 PRINT "T0 INTER A NEV SKILL TYPE (NEW)" 
1050 PRINT **T0 DELETE AN 0LD SKILL TYPE (DELETE)" 
1060 INPUT OTHERWISE (LIST)"; RS 
1070 IF RS»"DELETE" THEN 1310 
1080 IF RS«"NEV" THEN 1100 
1090 G0 T0 4000 

1100 INPUT "NEV SKILL NUMBER »"J NX 

1110 PRINT "C0NFIRM"J NX 

1120 INPUT "TYPE Y 0R N"J NS 

1130 IF NSOT" THEN 1100 

1140 F0R J«l T0 N 

1150 IF NX<FX(J) THEN 1220 

1160 IF NX>FX(J) THEN 1190 

1170 PRINT "S0RRY - BUT THAT SKILL ALREADY EXISTS." 

1180 G0 T0 9990 

1190 NEXT %1 

1200 Jl-N+1 

1210 Q0 T0 1250 

1220 F0R J1*N T0 J STEP -1 

1230 FS(JliO-FS(Jl)t FX(J1+1)»FX(J1) 

1240 NEXT Jl 

1250 FX(J1)»NX 

1260 PRINT "SKILL DESCRIPTI0N IS" 
1265 INPUT FSCJ1) 
1270 N-N+l 

1280 INPUT "T0 ENTER AN0THER SKILL TYPE Y ELSE N"J NS 
1290 IF NS<>"Y" THEN 4000 
1300 00 T0 1100 

1310 INPUT "SKILL NUMBER T0 BE DELETED IS"J NX 

1320 PRINT "C0NFIRM"! NX 

1325 INPUT "TYPE Y 0R N"; NS 

1330 IF NS<>"Y" THEN 1310 

1340 F0R J-l T0 N 

1350 IF NX-FX(J) THEN 1390 

1360 NEXT J 

1370 PRINT "S0RRY - THAT SKILL D0ES N0T EXIST" 
1380 60 T0 9990 
1390 F0R Jl-J T0 N 

1400 FS(J1)»FS( Jl+1) t FXCJD'FXCJU-l) 
1410 NEXT Jl 
1420 N-W-l 

1430 PRINT "SKILL # "; NXJ "HAS BEEN DELETED" 

.1440 INPUT "T0 DELETE AN0THER SKILL TYPE Y ELSE U n t NS 

1450 IF NS-"Y" THEN 1310 

4010 PRINT "CURRENT LIST 0F SKILLS"* DATE5(0) * PRINT 

4C*iO F0R J»l T0 Nt PRINT FX<J>; FS( J) t NEXT Jt PRINTt PRINT 

4060 60 T0 9990 

5000 IF ERR<>19 THEN 0N ERR0R 60 T0 0 
5010 PRINT "WAITIN6"t SLEEP 10 
5020 RESUME 
9990 FXC0>«Nl CL0SE 3 
9999 END 
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MODULE FORMAT 



Information describing each module of instruction is to be organized 
according to the following form to be entered into the computer, 

1. NUMBER 



This is any integer less than 30000 and will be used by 
the system to identify and order the modules. 

2. NAIC 



This is any phrase less than 33 characters in length used to 
name the moudle and will be used to describe the moudle on 
output lists. 

3. SIZE t 



This is any real number used to indicate the amount of material 
covered in the module, (possibly the percentage of credit the 
module is worth) 

4. PREREQUISITE NODULES 



This is a list of not more than three module numbers of the 
modules considered prerequisite to this module. Entry modules 
or 'stand alone' modules would have no prerequisite modules. 

5. PRETEST NUMBERS 



Mode A: This is a list of not more than ten integer nunfcers identify- 
ing the particular skills needed to perform the learning 
activities in this module. An activities prescription will 
be output upon demonstration of those skills. 

Mode B: This is a list of not more than ten integer numbers identify- 
ing those pretest items which test the objective(s) in this 
module. Satisfactory completion of those items on the pre- 
test will pennit bypassing this module for credit, (no 
activities prescription will be output) 



GG 



6. 
7. 



DATE 
MYS 



This is the availability of the module. Learning activities 
will not be available before this date and must be completed 
within the specified number of days. 



8. OBJECTIVE (S) 



The objective(s) text will not be entered in the computer but will 
be given to all students in a printed study guide. There is no 
limit to the number of objectives for each module. 



9. LEARNING ACTIVITIES 



The learning activities (maximum of 50) are designed to provide 
various modes of instruction and are keyed to the objective (s) 
and briefly described as follows: 
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NUMBER 



This is a 2 or more digit number in 
which the left hand digits are the 
same as the objective it references. 



STYLE 1 
STYLE 2 



The style numbers arc integers re- 
lating this activity to particular 
learning styles, (see special instruc- 
tions for determining these numbers) 



ACTIVITY 



This is any sentence less than 65 characters 
in length which states the activity to be 
performed. 
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Module #125 Energy* and Momentum 



OBJECTIVES: 



1. State or identify a precise definition of potential energy. 
The concept of 'work' as defined in physics is to be used in 
that definition. Also identify (kg m^/sec^) , (nt m) and 
(joules) as equivalent MKS units for potential energy. 

2. Given the description of an object moving in a given force 
field, state whether the potential energy of that object is 
increasing, decreasing or remaining unchanged. 

3. Calculate the change in potential energy of a body which is 
displaced from one point to another in the earths gravitational 
force field. (At the surface of the earth, the earth's field 
exerts a force of 9.8 nt toward the center of the earth's on 
each kilogram of mass.) 



4. Given information concerning the properties of a spring (how 
much force is required to compress that spring a given distance), 
construct a graph of force versus compression and determine the 
potential energy of the spring when it is compressed a given 
distance . 

5. State or identify a precise definition of kinetic energy. Also 
state or identify the precise functional relationship between 
the kinetic energy and the velocity of an object. 

6. Apply the principle of conservation of energy to calculate each 
of the following; 

a) the speed an object has after falling from a given height. 

b) the speed an object has after being fired from a spring * 
gun 

In each .case you will be given the mass of the object, the geometric 
dijnensions of the system and enough information to fully define 
the force. 

7. Given a description of a frictionless system such as a roller 
coaster, car coasting on a hill or a cyclest on a loop-the-loop: 
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apply the principle of conservation of energy to predict maximum 
heights and/or velocities of the object when given the initial 
total energy of the object. 

8. State or identify a definition of 'power', and recognize the 
units (joules/sec) and (watts) as equivalent MCS units of power. 

9. Given the power output of seme device, calculate how high that 
device can lift an object pn a given time. 

10. State or select a written definition of momentum and state or 
select a correct phrase describing the functional relationship 
between momentum and velocity. Also identify (ig m/sec) as 
correct MKS units for momentum. 

11. Given a description of an explosion type system (rifle recoil 
and huttet) or a simple inelastic collision type system (bullet 
hits block of wood); use the principle of conservation of 
momentum to find an unknown mass of velocity when given all 
other masses and velocities. 

12 ♦ State or select a definition of impluse and show how Newton's 
second law of motion (F-ma) implies that the impulse (Fat) 
imparted to an object is equivalent to the change in momentum 
(mAv) of that object. 

13. Find the impluse imparted to an object when given a graph of 
the force applied to the object as a function of the time it 
was applied. 

14. Find the average force involved in firing a projectile at a 
given speed when given the mass of the projectile and the time 
during which the force acts . 

15. Find the average force involed in firing a projectile a given 
distance. Information to be given will include the geometric 
dimensions of the device, the angle of elevation and the mass 
of the projectile* (Evaluation of this objective will include 
questions concerning all steps of the solution.) 
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ACTIVITIES - 125 



NBR STYLES DESCRIPTION 

011 (36,35) Taped Minilecture: "PE -Qualitative Discussion" 

012 (37,31) Supplemental Read: PSSC-p 300 sec 17-1, 17-2 

013 (35,32) Textbook Reading: p 80 sec 7.1-7.2, p 84 sec 7.5 

021 (36,31) Supplemental Read: Freeman -p 199 sec. 9.5-9.6 

031 (38,35) Tape Guided Lesson: "PE -Quantitative Analysis" 

032 (35,32) Textbook Reading: p 83 sec 7.5 

033 (37,34) Textbook Problems: p 93 #27, 28 

041 (36,31) Supplemental Read: PSSC- p 320 sec 18-1 

051 (37,35) Taped Minilecture: "KE and Newton's Law" 

061 (38,34) Film Loop: "Conversation of Energy" 

062 (36,31) Supplemental Read: PSSC-p 320 sec 18-1 

063 (35,32) Textbook Reading: p 82 sec 7.5-7.6 

064 (37,34) Textbook Problems: p 93 #26, 27, 28 

071 (40,32) Narrated Demonstr: "The toiler Coaster" 

081 (36,31) Supplemental Read: Freeman-p 209 sec 9.13 

082 (37,32) Textbook Iteading: p 81 sec 7.3 

091 (35,34) Textbook Problems: p 93 #32 

101 (36,32) Textbook Reading: p 95 sec 8.1 

111 (39,35) Narrated Lab Act: "Muzzle Velocity of a Rifle" 

112 (40,34) Demonstration: "Recoil Velocity" 

113 (36,32) Textbook Reading: p 96 sec 8.2, 8.6 

114 (37,34) Textbook Problems: p 105 #4, 5, 19, 20 

141 (37,32) Textbook Reading: top p 96 

142 (37,34) Textbook Problem: p 10.5 #6, 7 

151 (35,35) Taped Minilecture: "Forces to Propel Projectiles 

Note: The first two digits of the activity nunfcer correspond to 

the nunber of the objective to which that activity relates. 
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PROPOSED LIST OF LEARNING -ACTIVITIES 



1. Textbook Reading: 

a. Reading assignments selected from the textbook. 



2. Supplemental Reading: 

a. Any reading assignment outside of the textbook. 

b. Available in the learning center or library as 

indicated in the activity. (LC, Lib, Lib Res, etc.) 



3. Minilecture: 

a. Any taped discussion not involving lab apparatus. 

b. Available at the learning center desk with supple- 

mental printed information. 

4. Demonstration: 

a. Any piece(s) of lab or demonstration equipment 

available with short printed instructions on how 
to use and what to observe. 

b. Available in the learning center under an appropriate 

standardized sign, (possibly a list of currently 
available demonstrations can be maintained on the 
bulletin board) 



5. Narrated Demonstration: 

a. Same as 'Demonstration 1 except a tape player with an 
appropriate tape would be included with the 
equipment at the demonstration site. 



6. Film Loop: 

a. Single concept films and film loops. 

b. To be checked out from the learning center desk and 

used in projectors located in the learning center. 



7. Narrated Film Loops: 

a. Same as 'Film Loop 1 except an audio tape would be 
attached to the cassette to be used in a player 
located by the projectors . 
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8. Printed Lab Activity: 

a. My lab activity in which printed information is used 

to guide the student through a process of data 
taking and data analysis. 

b. The printed information is to be picked up at the 

learning center desk and the lab equipment will 
- be set up in the learning center under an 

appropriate sign. 

9. Narrated Lab Activity: 

a. Same as 'Printed Lab Activity' except an audio tape 

would be used to guide the student through a 
process of data taking and data analysis. 

b. The tape would be available to be checked out at the 

learning center desk and used with the designated 
lab equipment. 

10. Exhibit: 

a. Any poster, rieces of equipment, etc. used to 

illustrate specific ideas or problems. 

b. Placed in appropriate positions around the learning 

center or display case, (possibly a list of 
currently available exhibits can be maintained on 
the bulletin board) 

11. Special Problems: 

a. Any specially prepared printed problem. 

b. Available at the learning center desk or placed 

where students can pick them up. 

12. Textbook Problems: 

a. Any problem selected from the textbook. 

13. Group Discussion: 

a. There will be groups of students meeting to discuss 
this topic. Add your name to a sign-up sheet or 
find another interested student and post a new 
sign -up sheet. 

14 . Computer Assisted: 

a. Go to any available computer terminal. will 

receive instructions when you have typ^u KUN(41,99). 
Always bring pencil and scratch paper when you go 
for this type of lesson. 
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15. Instructor Conference: 

a. You should meet with your own instructor at this time. 
Please tell him that you are at a part of your 
• lesson that calls for activity number XXXX. 

16. Demonstration -Lecture: 
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Use of Learning Styles to Prescribe Learning Activities 



Background 

The following information is taken from the summary of the final 
report on Phase I of the learning styles project prepared by John 
Banks. 

This project was jointly proposed and submitted by Fox 
Valley Technical Institute, District 12, and the Center for 
Vocational, Technical and Adult Education at the University 
of Wisconsin - Stout to the Wisconsin Board of Vocational, 
Technical and Adult Education. The project was undertaken to 
investigate the interaction of learning styles and types of 
learning experiences provided to students in vocational- 
technical education. 

In June of 1972 the original project was funded by the 
Wisconsin Board of Vocational, Technical and Adult Education. 
In the fall of 1972 the University of Wisconsin - Stout sub- 
mitted a sub-proposal to the Fox Valley Technical Institute 
to identify a sub-set of learning styles and to determine 
their relationship with the acquisition of technical skills 
and knowledges. 

This study specifically identified two learning style 
continuums relevant to vocational and technical education 
programs. These two continuums were labeled as (1) concrete/ 
symbolic and (2) structured/unstructured. To measure these 
continuums two instruments were originally developed, a 
semantic differential and a Likcrt scale. The pilot in- 
struments were administered at the Fox Valley Technical In- 
stitute. Based on data gathered from the instruments, an 
individual was placed somewhere along each of the continuums. 
The relative position on a continuum determined the extent 
the individual was influenced by a particular learning style. 
An individual who located near the continuum midpoint would 
be affected by a composite of the continuum learning styles. 
A position near a continuum end was determined to show the 
individual as being highly affected by that style. 



Phase II 



This phase of the learning styles project deals with the problem 
of utilizing students' learning styles to prescribe individual learning 
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styles to prescribe individual learning activities. A student highly 
affected by a particular learning style would prefer to achieve the 
course objectives through those activities which most closely match 
nis style of learning. This requires an individualized environment 
in which each student may engage in a unique set of learning activities. 

A computerized system for providing student" with a set of activ- 
ities which most closely correlates with their styles of learning has 
been constructed. To achieve this matching of activities with students 
requires the input of "styles" information on both student and activi- 
ties . 

Student Information 

The two learning style continuums identified by John Banks will be 
used in Phase II. Also, the learning style opinionnaire constructed 
and tested by Banks will be used to place each student along the con- 
tinuum of the two styles. The opinionnaire will be administered on 
the opening day of classes and the information which consists of two 
numbers/student entered into the system through a terminal. If an 
electronic device is used for summarizing the papers, the styles for 
a few hundred students can be entered into their personal records in 
a few hours. 

Activity Information ffor the phvsics prnj«w.t) 

The learning styles opinionnaire was administered to 93 students 
enrolled in Physics 223 in the Fall semester 1973. The results are 
as follows: 

symbolic 11 ave » 37 s - 3.4 55 concrete 

unstructured 11 ave = 33 s « 4.2 55 structured 

These data will be used to arbitrarily associate each proposed learning 
activity in the basic physics modules with a point on each of the two 
style continuums. 

The activities will then be ranked according to the degree to which 
they correspond with the students styles and presented in that order. 
The first activity associated with each objective will then be the ac- 
tivity which most closely matches the students prefered styles of 
learning. 7 
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INFORMATION TO STUDENTS 



This is a description of the procedures you must follow to select 
a course of study and become enrolled with the Computer Managed [ n - 
structional System. Each step outlined below must be followed in the 
sequence in which it is presented. 

I. Pretest and learning Styles Questionnaire 

1. Pretest— This test will be administered on the first day of 

class and the results will be entered into your record. 

2. Learning Styles Questionnaire - this is a short questionnaire 

which is designed to provide information concerning your 
preferred modes of learning. The results of this question- 
naire will also become part of your record and will be used 
later to provide individualized learning prescriptions. 

II. Constructing Your Program 

A list of available modules are attached to this information sheet. 
You are to select those modules which you want to be included in 
your program of study. Pay particular attention to prerequisite 
requirements and availability dates so your program and planned 
dates of starting each module do not conflict with the given in- 
formation. 

Select your program and write the module numbers and expected 
starting dates below: 

Expected Starting Date 
Module Nbr Month Day 
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1 - ENROLL* 2-PROGRM* 3-PGMLST* 4- STATUS* 5-NXTMOD* 6- TESTER 



? 1 

wait 

please type your last name first 
then space and first name? hilgendorf al 
confirm hilgendorf al 
type y or n? y 

please type your id-number? 123-45-6789 

CONFIRM 123-45-6789 

TYPE Y OR N? Y 

ENROLLMENT OF HILGENDORF AL IS COMPLETE 
VAIT 



1 -ENROLL* 2-PROGRM* 3-PGMLST* 4-STATUS* 5-NXTMOD* 6- TESTER 



NAME PLEASE? HTLH 

SORRY - BUT I CAN'T FIND YOUR NAME ON THE CLASS LIST. 
PLEASE USE THE SAME NAME UNDER WHICH YOU ENROLLED 
OR TRY ENTERING YOUR LAST NAME ONLY. 
NAME PLEASE? HILG 

CONFIRM HILGENDORF AL 123-45-6789 

TYPE Y OR N? JC 

WAIT 

ENTER MODULE NUMBERS IN THE SEQUENCE IN WHICH YOU 
PLAN TO COMPLETE THEM. ALSO ENTER THE DATE YOU PLAN 
TO START EACH MODULE. LAST MODULE NUMBER SHOULD BE 
ZERO TO TERMINATE PROGRAM ENTRY. 

MODULE #? 1 10 

STARTING MONTH-XXX? AUG 

DAY? 30 

MODULE #? 1 15 

STARTING MONTH-XXX? AUG 

DAY? 30 

MODULE #? 120 

STARTING MONTH-XXX? SEP 

DAY? 1 5 

MODULE #? 125 

STARTING MONTH-XXX? SEP 

DAY? JUL 

STARTING DATE OUTSIDE MODULE AVAILABILITY - TRY AGAIN. 

STARTING MONTH-XXX? JJ£P 

DAY? 

MODULE 01 0 

PROGRAM ENTRY IS COMPLETE 
WAIT 



1- ENROLL* 2-PROGRM* 3-PGMLST* 4-STATUS* 5-NXTMOD, 6- TESTER 



RIM MAINST 



I -ENROLL* 2-PRCGRM, 3-PGMLST, 4- STATUS* 5-NXTMOD, 6- TESTER 



NAME PLEASE? A STU 
CONFIRM A STUDENT 
TYPE Y OR N? Y 
WAIT 



CURRENT PROGRAM 
'A STUDENT 
27-APR-74 

NUMBER MODULE DESCRIPTION 

110 LINEAR MOTION t TRAJECTORIES 

* 115 VECTORS AtfD FORCES 

1-0 FORCES - MOTION I WORK 

125 ENERGY AND MOMENTUM 

130 CIRCULAR AND ROTATIONAL MOTION 

150 ELECTRICAL PHENOMENA 

160 ELECTROSTATIC FIELDS 



SIZE STARTING DATE 

•5 30 AUG 74 

•4 5 SEP 74 

•4 10 SEP 74 

•6 20 SEP 74 

•5 25 SEP 74 

•2 7 OCT 74 

•4 15 OCT 74 



I -ENROLL, 2-PROGRM, 3-PGMLST, 4- STATUS* 5-NXTMOD, 6- TESTER 



7 4 

NAME PLEASE? A ST 
CONFIRM A STUDENT 
TYPE V OR N?X 
WAIT 



STATUS OF A STUDENT 27-APR-74 

» 

MODULE STARTED FINISHED LEVEL SIZE 



110 

ns 

120 
125 



22 APR 74 

23 APR 74 

24 APR 74 

25 APR 74 



22 APR 74 85 
24 APR 74 82 
24 APR 74 85 

i 



.5 
.4 
♦ 4 



I -ENROLL* 2-PROGRM, 3-PGMLST, 4-STATUS, 5-NXTMOD, 6-TESTER 
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WAIT 
WAIT 



LEARNING ACTIVITIES PRESCRIPTI0N F0R: A STUDENT 
37 26 

M0DULE # 125 ENERGY AND M0MENTUM 25-APR-74 



0BJ 
1 





2 




3 




1 


2 






1 


3 






2 




3 




1 


4 






1 


5 






1 


6 






2 




3 




1 




4 


7 






1 


8 






1 




2 


9 






1 


10 






1 


11 






3 




2 




4 




1 


14 






1 




2 


15 






1 



ACTIVITY 

rPPLEMENTAL READ: PSSC-P 300 SEC 17-1* 17-2 

XTB00K READING: P 80 SEC 7.1-7.1* P 84 SEC 7.5 

iPED MINILECTURE: "PE-QUALI TATI VE DISCUSSI0N" ' 

1 SUPPLEMENTAL READ: FREEMAN- P 199 SEC. 9.5-9.6 

XTB00K READING: P 83 SEC 7.5 

3CTB00K PR0BLEMS: P 93 #27* 28 

1 TAPE GUIDED LESS0N: "FE-QUANTI TATI VE ANALYSIS" 

FPPLEMENTAL READ: PSSC- P 320 SEC 18-1 

iPED MINILECTURE: "KE AND NEWT0N»S LAW" 

IPPLEMEN.TAL READ: PSSC-P 320 SEC 18-1 

XTB00K READING: P 82 SEC 7.5-7.6 

LM L00P: "C0NSERVATI0N 0F ENERGY" 

XTB00K PR0BLEMS: P 93 #26* 27* 28 

1 NARRATED DEM0NSTR: "THE R0LLER C0ASTER" 

[PPLEMENTAL READ: FR EEMAN-P 209 SEC 9.13 

3CTB00K READING: P 81 SEC 7*3 

XTB00K PR0BLEMS: P 93 #32 

XTB00K READING: P 95 SEC 8.1 

XTB00K READING: P 96 SEC 8.2* 8.6 

M0N STRATI 0N: "REC0IL VEL0CITY" 

XTB00K PR0BL EMS: P 105 #4* 5* 19* 20 

iRRATED LAB ACT: "MUZZLE VEL0CITY 0F A RIFLE" 

XTB00K READING: T0P P 96 

XTB00K PR0ELEM: P 105 #6* 7 > 



1 TAPED MINILECTURE: 



'F0RCES T0 PR0PEL PR0JECTILES" 



1-ENR0LL* 2-PR0GRM* 3-PGMLST* 4- STATUS* 5-NXTM0D* 6-TESTER 



VAIT 
WAIT 



LEARNING ACTIVITIES PRESCRIPTION FOR: A STUDENT 
27 35 

MODULE # 125 ENERGY AND MOMENTUM 



25-APR-74 



0BJ 



ACTIVITY 



1 






1 




3 




2 


2 






1 


3 






2 




3 




1 


4 






1 


5 






1 


6 






3 




4 




2 




1 


7 






1 


8 






1 




2 


9 






1 


10 






1 


1 1 






3 




4 




1 




2 


14 






2 




1 


15 






1 



"PE- QUALITATIVE DISCUSSION" 

P 80 SEC 7.1-7.1* P 84 SEC 7.5 



EXTB00K READING! P 83 SEC 7.5 

EXTB00K PROBLEMS: P 93 #27* 28 

*PE GUIDED LESSON: "PE- QUANTITATIVE ANAL1 

1 SUPPLEMENTAL READ: PSSC- P 320 SEC 18-1 

1 TAPED MINILECTURE: "KE AND NEWTON'S LAV" 

DCTBO0K READING: P 82 SEC 7.5-7.6 



1 FILM LOOP: 



•CONSERVATION OF ENERGY" 



1 NARRATED DEMON STR: "THE ROLLER COASTER" 

JPPLEMENTAL READ: FREEMAN- P 209 SEC 9.13 

5XTB00K READING: P 81 SEC 7*3 

2XTB00K PROBLEMS: P 9 3 #32 

DCTB00K READING: P 95 SEC 8.1 

3 TEXTBOOK READING: P 9 6 SEC 8.2* 8.6 

4 TEXTBOOK PROBLEMS: P 105 #4* 5* 19* 20 
IRRATED LAB ACT: "MUZZLE VELOCITY OF A RIFLE" 
EMON STRATI ON: "RECOIL VELOCITY" 

DCTB00K PROBLEM: P 105 #6* 7 

EXTB00K READING: TOP P 96 

1 TAPED MINILECTURE: "FO-RCES TO PROPEL PROJECTILES" 



1 - ENROLL* 2-PR0GRM* 3-PGMLST* 4- STATUS* 5-NXTM0D* 6- TESTER 

1-2 
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RUN EXPUSE 

ENTER MONTH<XXX> AND DAY<99> YOU WANT REPORT TO START 
? AUG, 26 



DATE 



EXPECTED MODULE ENTRY 
- BY DATE - 

MODULE(NBR OF STUDENTS) - - - 



26 AUG 74 


1 10 


< 


3 


) 


105 


< 


3 


2 SEP 74 


1 15 


< 


1 


) 


110 


< 


1 


9 SEP 74 


115 


< 


4 


) 


120 


< 


2 


16 SEP 74 


120 


< 


3 


) 


125 


< 




23 SEP 74 


125 


< 


2 


) 


130 


< 




30 SEP 74 


1.35 


< 


2 


i 


1.30 


< 




7 OCT 74 


150 


< 


3 


> 


135 


< 




14 OCT 74 


160 


< 


2 


> 


150 


< 




21 OCT 74 
















28 OCT 74 


165 


< 


I 


) 








4 NOV 74 


170 


< 


1 


) 









110 ( 1 ) 

135 < 1 > 



READY 
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PROGRESS REPORT - 27-APR-74 

STUDENT MODULE STARTED FINISHED 

1 A STUDENT 125 25 APR 74 

2 B STUDENT 1.05 27 APR 74 27 APR 74 

3 BLANK JIM 105 

4 C STUDENT 

5 GOOFER FRED 115 27 APR 74 

6 HILL A BIG 120 25 APR 74 25 APR 74 

7 MORSS ROBERT 110 22 APR 74 24 APR 74 

READY "* 



\ 



M-2 



'89 



RUN MODUSE 



j CURRENT MODULE ACTIVITY - 27-APR-74 



MODULE 


STUDENTS 


STUDENTS 


STUDENTS 


NU4RFR 


riMi cum 




LArLO I LU 


105 


2 


0 


i" 


110 


3 


0 


i. 


115 


1 


i 


i 


120 


2 


0 


0 


125 


0 


i 


i 


130 


0 


0 


i 


135 


0 


0 


0 


150 


0 


0 


0 


160 


0 


0 


0 


165 


0 


0 


0 


170 


0 


0 


0 


175 


0 


0 


0 


180 


0 


0 


0 


185 


0 


0 


0 


READY 
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ERIC 
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MODULE SUMMARY - 27-APR-74 

NBR NAME SIZE AVAILABLE DAYS 

105 METRIC MEASUREMENT 4 DATA ANALYS .2 26 AUG 74 14 

P ■ 210 221 

110 LINEAR MOTION I TRAJECTORIES .5 26 AUG 74 21 

P ■ 210 221 222 224 231 232 

115 VECTORS AND FORCES .4 26 AUG 74 21 

P - 210 221 222 224 232 242 243 244 

120 FORCES - MOTION t WORK .4 2 SEP 74 21 

Q « 110 115 

125 ENERGY AND MOMENTUM .6 9 SEP 74 21 

Q » 120 

130 CIRCULAR .AND ROTATIONAL MOTION .5 16 SEP 74 21 

Q ■ .120 125 
P ■ 241 

135 PROPERTIES OF MATERIALS .6 23 SEP 74 28 

Q » 1 20 

150 ELECTRICAL PHENOMENA .2 7 OCT 74 28 

P « 210 221 

160 ELECTROSTATIC FIELDS .4 7 OCT. 74 28 

Q « 125 150 

165 POTENTIAL - CURRENT I POWER .4 14 OCT 74 28 

0 » 160 

170 ELECTROMAGNETISM I EMF .5 21 OCT 74 28 

Q - 165 

175 ELECTRICAL MEASUREMENTS .4 28 OCT 74 28 

Q * 170 

180 ELECT PROP OF MATERIALS I DEVICE .3 4 NOV 74 28 

Q « 170 

185 A. C .3 M NOV 74 28 

Q - 170 



READY 

M-4 
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